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Abstract 


'  J  Microcomputer  software  was  designed  and  written  to  compare  a 
standard  routing  technique  (Lee)  with  an  experimental,  unpublished 
routing  technique  proposed  by  J.  Vlntr  for  two'-layer  printed  circuit 
boards. 


Vintr's  algorithm,  as  studied  here*,  uses  a  four-iteration  approach 
to  minimize  unroutable  nets  and  minimize  route  distance. 

The  unrouted  nets  and  average  route  lengths  were  observed  and 
analyzed  for  differing  sizes  of  two-point  nets. 

Analysis  revealed  a  reduction  of  unroutable  connections  across 
Iterations,  but  congestion  played  a  heavy  role  In  the  overall  success  of 
finding  paths. 

A  recommendation  is  made  that  use  of  8-blt  microcomputers  in  design 
automation  Is  impractical,  and  research  In  this  area  of  technology  can 
beat  be  accomplished  using  larger  computer  systems.  ^ 


A  COMPARISON  AND  ANALYSIS  OF  VINTR'S  GLOBAL  ROUTING  ALGORITHM  WITH  THE 


LEE  ROUTING  ALGORITHM  IN  TWO-LAYER  PRINTED  CIRCUIT  BOARDS 

I.  Introduction 

Background  Information 

The  problem  of  printed  circuit  board  (PCB)  routing  Involves  a  series 
of  connections  between  two  specific  points  called  terminals.  An  attempt 
Is  made  to  connect  all  terminals  with  no  wires  Interfering  with  any 
other  wires.  Interference  may  cake  the  form  of  wires  physically 
Intersecting  with  other  wires,  two  wires  too  close  to  each  ocher,  or 
long  wires  on  different  layers  of  a  PCB. (7) 

These  last  two  problems  generally  require  chat  the  wires  maintain  a 
minimum  spacing  at  all  points  on  Che  board  and  that  wires  on  two-layer 
PCBs  generally  flow  In  directions  perpendicular  to  each  other  (l.e.  a 
horizontal  flow  on  one  layer  and  a  vertical  flow  on  the  ocher  layer). (5) 
A  connection  between  PCB  layers  is  called  a  vla.(l) 

Traditional  routing  of  PCB's  has  been  accomplished  In  two  steps — 
loose  routing  and  final  routing. (7)  The  loose  routing  step  Is  Che 
planning  stage  for  final  routing.  It  determines  which  wires  will  run 
through  specific  pathways  on  the  PCB.  The  primary  consideration  in  this 
step  Is  Che  reduction  of  congestion  through  these  narrow  pathways  to 
avoid  bottlenecks.  This  may  necessitate  rerouting  some  wires. 

Final  routing  Is  the  actual  allocation  of  wires  to  cracks.  There 
are  three  basic  final  routers:  grid  expansion,  channel  routing,  and 
linear  expansion. (7)  The  linear  expansion  router  Is  efficient  for 
simple  Casks,  but  is  slow,  requires  a  large  stack  of  data,  and  does  not 
guarantee  a  connection  even  If  one  exists.  The  channel  router  always 
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makes  all  the  connections  even  If  it  has  to  overflow  the  pathways  and 
destroy  the  minimum  spacing  requirement  between  wires.  The  grid 
expansion  router  (Lee's  router)  requiicr  n  large  amount  of  memory  for 
large,  dense  PCB  layouts,  but  guarantees  a  path  connection  if  it  exists 
with  the  path  being  the  minimum  wire  distance. (4) 

The  basic  Lee  algorithm  uses  a  matrix  of  grid  points  or  cells  to 
represent  the  surface  or  layer  of  a  PCB  with  the  distance  between  cells 
as  the  minimum  wire  separation.  The  algorithm  (1)  begins  at  a  specific 
cell  which  is  to  be  connected  to  another  cell.  The  start  cell  is 
labeled  as  "1”.  Then  all  adjacent  cells  with  a  Manhattan  distance  of 
one  are  labeled  as  "2".  All  unlabeled  cells  with  a  Manhatten  distance 
of  one  from  these  cells  are  labeled  “2",  and  so  on,  until  the  target 
cell  is  reached.  A  retrace  procedure  then  executed  to  find  a  minimum- 
distance  path  back  to  the  start  cell.  Thus,  if  the  target  cell  was 
reached  on  the  ith  expansion,  the  retrace  begins  at  the  target  cell 
and  finds  a  cell  labeled  (1-1).  This  cell  is  then  used  to  find  a  cell 
labeled  (i-2).  In  this  manner,  the  shortest  path  between  two  cells  is 
obtained. (6) 

There  are  many  variations  of  the  basic  Lee  algorithm.  Rubin  (6) 
disc^^ses  variations  to  allow  minimal-state  cell  coding,  paths  with 
minimum  turns,  and  search  size  reduction.  Hoel  (3)  incorporates  an 
array  of  stacks  rather  chan  a  single  list  to  speed  up  searches.  Hoel 
also  Implements  a  cost-encoding  scheme  which  allows  retracing  codes  Co 
be  assigned  as  soon  as  they  are  reached. 

Algorithms  which  combine  loose  and  final  routing  are  called  global 
routers. (7)  One  such  global  router  is  by  Vintr.(8)  This  algorithm 


initially  routes  a  PCB  using  a  standard  router  (e.g.  Lee's  router)  and 
then  uses  an  iterative  approach  to  further  minimize  the  total  Manhattan 
distance  of  all  paths.  After  the  board  Is  routed  using  the  standard 
router,  only  a  portion  (say  10%)  of  Che  ends  of  each  path  are 
implemented.  This  is  the  end  of  the  first  iteration.  The  second 
iteration  begins  with  Che  selection  of  a  single  connection,  eliminates 
its  tails  and  reroutes  Che  entire  path.  Each  connection  is  rerouted  in 
this  manner  and  then  a  larger  portion  (say  20%)  of  Che  ends  of  the  path 
are  Implemented.  This  iterative  process  is  continued  until  the 
implemented  portion  of  each  tail  equals  or  exceeds  50%.  Soukup  states 
that  although  Vintr's  "router  is  very  efficient,  it  cannot  guarantee  all 
the  conriections" .  However,  Soukup  goes  on  to  state  that  Vintr's  router 
is  Che  best  global  router  today  and,  although  it  may  not  complete  all 
the  connections,  it  is  a  "cure  for  the  most  frequent  cause  of  unrouCable 
nets  on  PCB's;  the  blocking  of  pins".  This  research  will  explore 
Vintr's  method  of  routing  PCBs  by  looking  at  whether  the  algorithm 
minimizes  Manhattan  distance  and  whether  the  number  of  unrouteci  nets 
decreases. 

The  Problem 

The  Air  Force  Institute  of  Technology  is  an  educational/research 
institution  through  which  individuals  can  be  introduced  to  the  field  of 
design  automation  and  further  state-of-the-art  technology  in  the  field 
of  design  automation.  The  tool  to  provide  Che  means  for  this  education 
and  training  is  Che  Design  Automation  Hardware  System  (DAI1S)(2)  being 
developed  by  several  AFIT  faculty  members.  DAHS  will  be  a  single, 
dedicated  computer  system  integrating  all  design  automation  software  at 


AFIT  into  a  central  data  base.  One  aspect  of  DAIIS  will  be  the  design 
and  Implementation  of  a  user-oriented,  two-layer  printed  circuit  board 
routing  program  to  be  used  by  AFIT/ENG  personnel  in  their  research 
efforts.  Preliminary  research  is  required  to  develop  and  fully  evaluate 
an  efficient  routing  algorithm  for  the  design  automation  of  two-layer 
printed  circuit  board  (PCS)  routing.  The  software  will  be  designed  for 
use  by  the  Department  of  Electrical  and  Computer  Engineering  at  the  Air 
Force  Institute  of  Technology  (AFIT)  in  support  of  DAHS. 

Objective 

The  objective  of  this  project  Is  to  provide  the  first  step  analysis 
of  a  relatively  new  routing  algorithm  by  J.  Vlntr  (8)  using  a 
microcomputer.  The  research  conducted  In  this  study  will  be  the  basis 
for  later  Implementation  of  microcomputer-based  design  automation 
software  supporting  DAHS  for  faculty  and  students. 

Standards 

Several  standards  were  deemed  important  for  the  successful 
completion  of  the  project.  First,  the  system  should  be  written  In  a 
structured  language  to  encourage  easy  modification  and  documentation. 
Second,  the  routing  algorithm  should  use  sub-algorithms  designed  to 
reduce  run-time  and  minimize,  as  practical  as  possible,  the  length  of 
connections  and  the  number  of  unroutable  nets.  Third,  the  system  should 
be  designed  to  process  virtually  any  size  PCB.  Fourth,  the  capability 
should  be  Included  to  allow  the  user  to  enter  data  and  to  create  data 
files.  Fifth,  the  path  for  each  net  routed  should  be  printable  to  allow 
later  analysis. 


Approach  to  Solution 

With  the  above  objectives  in  mind,  the  solution  was  approached  in 
the  following  four  major  phases:  system  requirements,  software  design, 
software  implementation,  and  analysis.  In  the  initial  phase,  the  system 
requirements  were  necessary  to  determine  constraints  the  hardware  would 
place  on  software  execution,  data  storage,  and  data  retrieval.  The 
overall  software  design  phase  integrated  the  hardware  and  software 
requirements  into  a  high-level  model  from  which  the  software  could  be 
Implemented.  In  addition,  a  language  had  to  be  selected  to  fulfill  the 
requirements  of  modularity  and  structured  design.  The  software 
implementation  phase  used  the  software  design  to  flowchart  the  software 
prior  to  actual  writing  of  code.  The  implementation  phase  also  Included 
testing  and  debugging.  The  final  phase,  analysis,  was  the  systematic 


execution  of  the  program  and  analysis  of  the  results. 
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The  system  was  evaluated  with  the  following  three  requirements  in 
mind:  the  minimization  of  unroutable  nets,  path  distance,  and 

processing  time.  Several  parameters  were  considered  in  light  of  these 
system  requirements  and  constraints. 

Board  Parameters 

First,  the  effects  of  the  system  requirements  on  the  PCB  were 
evaluated.  A  typical  PCB  divided  into  a  regular  structure  of  uniform 
cells  applicable  to  the  algorithms  discussed  throughout  this  report  is 
shown  in  Figure  2.1. 


Fig  2.1.  A  PCB  represented  by  a  uniform  grid  structure 


Most  printed  circuit  boards  for  microcomputer  based  systems  have 
dimensions  of  eight  by  ten  inches  or  less  and  have  two  layers  upon  which 
the  circuits  are  etched.  The  wire  widths  average  50  rails  wide  with  50 


mil  spacing  between  wires. (1)  Consequently,  the  center-to-center 
distance  of  parallel  wires  is  100  mils.  A  grid  structure  can  then  be 
superimposed  on  the  PCB.  The  grid  points  or  cells  maintain  the  100  mil 
spacing  necessary  and  represent  the  physical  points  on  the  PCB  where 
pins  reside  or  the  paths  where  wire  routes  pass  through.  Two  cells  are 
adjacent  if  the  Manhattan  distance  between  them  is  one.  A  path  can  be 
formed  only  between  adjacent  cells.  Each  cell  may  either  be  an 
obstacle,  that  is,  unusable  due  to  physical  blockages  or  it  may  be 
available  for  the  placement  of  a  pin  or  circuit  path.  This 
representation  greatly  simplifies  the  task  of  finding  the  minimum  path 
for  a  wire.  Mo  curves  exist  and  the  Euclidean  distance  does  not  apply. 
Rather,  distances  are  calculated  on  the  Manhattan  distance  measure  and 
the  calculation  is  generally  an  order  of  magnitude  faster  than 
calculations  based  on  the  Euclidean  measure. (1) 

Figure  2.2  shows  the  representative  difference  in  calculating 
minimum  distance  by  Manhattan  and  Euclidean  based  measures. 


Euclidean:  (x^  +  y^)**0.5 
Manhattan:  x  +  y 

Fig  2.2.  Euclidean/Hanhattan  distance 
from  point  A  to  B 
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To  determine  the  dimensions  of  a  grid  used  to  represent  an  eight  by 
ten  inch  PCB,  it  is  easiest  to  calculate  the  number  of  cells  in  a  one- 
inch  distance  and  then  multiply  this  value  times  the  board  dimensions  in 
Inches.  Since  cells  are  placed  at  100  mil  intervals,  there  are  10  cells 
per  inch.  Therefore,  the  dimensions  of  the  PCB  in  question  are  80  by 
100  cells.  The  total  number  of  cells  in  a  single  layer  of  the  board  is 
SOOO  and  with  two  layers,  we  have  16,000  cells.  It  is  clear  that  the 
number  of  required  cells  would  easily  overflow  a  microcomputer's  memory 
if  one  takes  into  account  that  the  program,  operating  system,  and  system 
support  modules  or  programs  are  also  needed  in  core  memory  at  the  same 
time.  Later  testing  showed  an  unacceptable  length  of  time  required  to 
connect  random  points  on  this  size  board.  Consequently,  to  preserve  the 
original  nature  of  the  research,  the  6  inch  by  6  inch  board  was  divided 
into  four  equal  sized  segments  as  shown  in  Figure  2.3. 


6  Inches 


6  inches 


.  Segment  . 

.  Segment  . 

.  Segment  . 

.  Segment  . 

Fig  2.3.  A  PCB  divided  into  two-by-two  segments 
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Cell  Paramecers 


/d 


The  second  factor  Influenced  by  the  system  requirements  is  that  of 
cell  coding.  Hoel  (3)  and  Rubin  (6)  both  discuss  strategies  for  cell- 
state  encoding.  Each  cell  requires  a  designation  of  whether  or  not  the 
cell  Is  free  for  use.  In  addition,  a  designation  for  the  direction  of 
the  retrace  path  Is  required.  The  Initial  rationale  for  each  cell's 
state  allowed  for  three  possible  conditions.  The  first  condition  Is 
that  the  cell  is  unavailable  for  use.  The  second  condition  Is  that  the 
cell  has  been  reached  through  previous  cell  expansion.  The  third 
condition  Is  that  a  cell  has  not  been  previously  reached  and  Is 
available  for  expansion.  These  three  values  are  simply  flag  conditions 
and  can  be  represented  by  boolean  values.  It  was  later  discovered  that 
the  third  condition  flag  could  be  eliminated.  Consequently,  cell 
conditions  could  be  represented  by  two  bits.  If  these  values  are 
defined  during  software  implementation  as  a  packed  array,  only  one  word 
of  memory  Is  required  for  their  storage.  The  retrace  direction  was  a 
little  more  involved.  Initially,  three  different  directions  were 
considered,  each  direction  occupying  one  word  of  memory.  A  zero,  plus 
one,  or  negative  one  value  could  then  be  stored  in  any  of  the  three 
locations.  However,  It  would  have  taken  three  words  Just  to  store  the 
retrace  directions.  The  other  extreme  would  have  been  to  define  one 
word  of  storage  for  any  and  all  of  the  possible  retrace  directions  and 
decode  each  value  when  a  path  was  being  retraced.  These  two  extremes 
were  eliminated  either  due  to  excessive  core  memory  consumption  or 
excessive  processing  time  devoted  to  decoding.  A  compromise  was  made  In 
this  area  which  occupied  only  one  word  of  memory.  The  retrace 
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directions  of  horizontal,  '/ertical,  and  layer  change  could  each  be 
allowed  two  bits  of  storage,  and  if  all  three  were  defined  in  software 
as  a  packed  array,  only  one  word  of  memory  would  be  used.  The  allowable 
two  bit  values  for  each  retrace  direction  were  "0”  for  no  change  of 
direction,  ”1"  for  a  plus  one  change  of  this  direction,  and  "2"  for  a 
minus  one  change  for  this  direction.  The  last  value  would  then  be  the 
only  value  decoded.  As  a  result  of  this  cell  analysis,  14,400  words  of 

memory  are  required  for  a  6  inch  by  6  inch  grid.  Apple  UCSD  Pascal 

allows  only  18,000  words  of  memory  available  for  code  and  data  in  any 
procedure. (9)  This  constraint  allows  only  a  single  segment  no  larger 
than  3  inches  by  3  Inches  (30  by  30  cells)  to  reside  in  central  memory 

at  one  time.  Thus,  each  segment  shown  in  Figure  2.3  is  further  divided 

into  cells  as  shown  in  Figure  2.4  below. 


Fig.  2.4.  Dimensions  of  a  segment 


Secondary  Storage 


The  third  factor  influenced  by  the  system  requirements  was  that  of 
secondary  storage.  The  Apple  UCSD  Pascal  system  formats  diskette 
storage  in  blocks.  Each  block  stores  256  bytes  of  data. (9)  Thus,  to 
store  one  30X30X2  grid  segment  at  two  words  per  cell,  fifteen  blocks  are 
necessary.  For  a  6  inch  by  6  inch  PCB  (four  segments),  sufficient 
memory  exists  to  store  all  segments,  the  retrace  file,  the  input  file, 
and  any  intermediate  files  for  processing.  A  user  could  potentially 
store  10  segments,  the  retrace  file,  an  input  file,  and  several 
intermediate  files  with  the  128K  RAM  disk.  Due  to  the  nature  of  Apple 
Pascal,  files  must  be  stored  on  disk  in  contiguous  blocks;  therefore, 
when  a  file  is  opened  for  writing,  the  largest  amount  of  contiguous 
storage  is  reserved  for  the  file.  Thus,  all  remaining  storage  could  be 
reserved  for  the  writing  of  one  file.  This  problem  is  especially 
difficult  if  one  is  writing  to  multiple  files.  The  solution  was  to 
specify  an  approximate  amount  of  storage  for  the  file.  The  system  would 
reserve  the  space  and  use  only  the  amount  it  needed  when  storing  the 
file  and  release  the  remainder. 

Processing  Parameters 

The  fourth  factor  influencing  the  system  is  the  general  processing 
requirements.  First,  the  cost  function  is  the  Manhattan  distance 
between  adjacent  cells  of  the  net.  Thus,  Lee's  algorithm  will  produce  a 
minimum  distance/cost  path.  Second,  Lee  expansion  is  terminated  when 
the  net  end  point  is  reached  then  the  retrace  procedure  is  performed. 
Third,  expansion  is  in  all  directions  to  ensure  finding  a  path  if  indeed 
one  exists.  Fourth,  to  conserve  memory  and  still  have  sufficient  room 
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Co  store  all  cells  reached  during  expansion,  the  largest  potential 
number  of  cells  reached  during  expansion  must  be  known  so  Che  size  of 
Che  list  of  cells  reached  can  be  defined.  For  a  board  of  60  by  60 
cells,  Che  approximate  center  is  at  cell  (30,30).  With  no  obstacles,  a 
total  of  30  expansions  will  result  in  the  maximum  number  of  cells 
reached,  120  cells  per  layer  or  240  cells  overall. 

Expansion  Directions 

There  is  a  general  difficulty  with  any  search  algorithm  as  to  Che 
most  appropriate  direction  to  cake.  With  a  predetermined  expansion 
algorithm,  the  first  expansion  direction  may  be  opposite  to  Che 
direction  of  the  end  cell.  A  requirement  to  always  expand  a  cell  in  Che 
direction  of  the  end  cell  was  considered  but  was  disregarded  since 
expanding  Che  cell  closest  to  Che  end  cell  would  largely  eliminate  the 
effects  of  misdirection.  The  closest  cell  would  expand  in  no  more  chan 
three  directions  before  a  connection  was  made  while  Che  use  of  a 
sophisticated  direction  prioritization  algorithm  would  add  nothing  to 
achieve  shorter  paths  or  lower  processing  time. 

Overcoming  Segment  Processing  Problems 

As  a  cell  is  reached  during  Che  expansion  phase,  its  coordinates  are 
saved  in  a  list.  The  expansion  phase  uses  the  entries  of  this  list  to 
reach  additional  culls,  and  it  is  unlikely  a  connection  would  be  made 
when  expanding  the  very  first  entry  of  the  list.  That  is,  the  actual 
cell  needed  to  make  a  connection  may  be  far  down  the  list  and  many 
entries  might  be  needlessly  expanded  before  the  cell  leading  to  a 
connection  is  expanded.  In  addition,  cells  from  different  segments  will 
be  entered  into  Che  list  as  segment  boundaries  are  crossed.  The  result 
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of  expanding  this  list  will  be  an  additional  processing  delay  due  to 
increased  swapping  of  segments. 


To  eliminate  or  reduce  the  needless  expansion  of  cells  and  increased 
segment  swapping,  an  algorithm  can  be  designed  to  ensure  that  the  cell 
closest  to  the  end  cell  is  processed  first  followed  by  all  cells  of  the 
same  segment.  This  algorithm  should  sort  the  list  of  reached  cells 
first  in  ascending  Manhattan  distance  to  the  end  cell  and  then  by 
segment.  The  effect  of  the  sorting  will  reduce  both  the  number  of  cell 
expansions  and  the  number  of  segment  swaps. 

Data  Manipulation  Parameters 

The  fifth  factor  influencing  the  system  requirements  is  the  need  for 
a  general  purpose  program  to  allow  data  entry  and  to  generate  a  hardcopy 
listing  of  each  routed  net's  path  and  length.  The  decision  was  made  to 
provide  a  separate  program  for  data  input,  segment  initialization  and 
obstacle  cell  specification.  The  main  routing  program  would  print  the 
route  file  and  path  lengths  since  this  file  must  be  used  as  input  to 
Vintr's  algorithm  and  recreated  from  one  iteration  to  the  next. 

Summary 

Although  the  original  board  parameters  were  8X10  inches,  it  was 
determined  in  preliminary  testing  that  an  unacceptable  length  of  time 
was  required  to  route  nets.  Thus,  to  preserve  the  original  objectives, 
the  board  dimensions  were  reduced  to  6X6  inches.  The  cell  structure  was 
designed  such  that  only  the  most  important  information  (retrace 
direction,  cell  availability  condition,  and  cell  reached  condition) 
would  be  stored  in  the  least  amount  of  memory.  Thus,  each  cell  only 
requires  two  words  of  memory.  Testing  showed  the  128K  RAM  dish  provided 
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adequate  space  to  store  all  data  input,  board  segments,  retrace  paths, 
and  Intermediate  files  as  long  as  sufficient  space  was  defined  in 
software.  To  speed  up  the  connection  process  and  eliminate  the  number 
of  I/Os,  two  algorithms  had  to  be  designed.  The  first  was  to  sort  the 
list  of  cells  reached  during  expansion  so  the  closest  to  the  target 
would  be  expanded  first.  The  second  algorithm  uses  the  results  of  the 
first  to  build  a  new  list  by  taking  the  cell  closest  to  the  end  cell  and 
all  other  reached  cells  on  the  same  grid,  then  the  next  closest  cell 
remaining  in  the  reached  cell  list  and  all  others  on  the  same  grid,  and 
so  on  until  no  cells  remain  in  the  reached  list.  The  last  design  factor 
was  of  data  input  and  output.  A  separate  program  was  written  to  input 
data  and  build  the  board  segments.  Since  the  retrace  file  is  used  as 
Input  to  Vintr's  algorithm,  the  net  paths  would  be  printed  with  each 
path's  length  before  the  ro^e  file  is  passed  to  Vintr's  algorithm. 


III.  System  Design 


Introduction 

To  meet  the  requirements  previously  defined,  four  major  software 
routines  had  to  be  developed.  These  four  routines  and  how  they  Interact 
with  each  other  are  shown  in  Figure  3.1,  the  overall  system  design.  The 
second,  third,  and  fourth  routines  are  embedded  within  the  box  titled 
"ROUTE  DATA  FILES". 


Fig  3.1.  System  Design 

First  of  all,  a  data  input  routine  was  required  to  input  the  ceil 
coordinates  for  each  net  added  to  the  net  file  (the  input  data  file)  and 
the  coordinates  of  obstacle  cells.  The  second  and  third  routines 
developed  were  the  routing  and  grid  management  routines,  respectively. 
These  routines  are  lilglily  dependent  on  each  other  for  fast,  efficient 
execution.  In  the  fourth  routine,  a  method  was  needed  to  provide  for 
the  primary  direction  of  expansion.  This  requires  some  type  of  sorting 
scheme  to  expand  cells  closest  to  the  target  cell  first.  As  seen  from 
Figure  3.1,  there  are  two  separate  programs  to  handle  data  entry  and  the 
routing/printing  process. 
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Input  Design 


Figure  3.2  shows  the  overall  Input  design.  The  user  has  the  option 
to  build  the  initial  data  file  and/or  specify  obstacle  cells.  To  build 


Fig  3.2.  Input  Design 


the  data  files,  the  user  is  prompted  for  the  start  cell  coordinates  and 
then  the  end  cell  coordinates  for  each  net.  The  coordinates  of  each  net 
is  displayed  so  the  net  may  be  rejected  if  any  of  the  coordinate  values 
have  been  entered  incorrectly.  When  all  nets  have  been  entered,  the 
entire  board  is  initialized.  Individual  obstacle  cells  may  then  be 
designated  on  the  board  with  the  capability  to  Ignore  in  obstacle  cell 
if  erroneous  coordinates  have  been  entered.  All  board  segments  are  then 
saved  on  secondary  storage.  This  initialization  step  ensures  that  all 
retrace  directions  and  condition  flags  are  set  to  zero  values  except  for 
those  coordinates  which  represent  occupied  cells  (a  start,  end,  or 
obstacle  cell).  Each  start/end  cell  has  its  obstacle  flag  set  to  "1"  on 
each  layer  of  the  grid  to  represent  the  physical  placement  of  a  chip's 
pin  which  typically  extends  through  to  the  opposite  side  of  the  PCB. 
Obstacle  cells  are  designated  by  tjaving  their  obstacle  flags  set  to  “1” 
also.  However,  differing  from  start/end  cells,  obstacle  cells  must  be 


specified  for  each  side  of  the  PCB.  This  method  of  designating  obstacle 
cells  allows  special  paths  to  be  constructed  which  are  wider  than 
normal,  paths  such  as  the  power  and  ground  circuits  and  edge  connectors 
which  generally  occupy  only  one  side  of  the  PCB. 

In  summary,  the  input  design  allows  input  of  two-value  cell 
coordinates  for  the  start  and  end  points  of  each  net  and  three-value 
cell  coordinates  for  obstacle  cells.  The  end  points  of  a  net  may  be 
rejected  if  an  Incorrect  value  is  entered.  Once  the  list  of  nets  and 
obstacle  cells  are  entered,  they  are  permanently  stored  on  secondary 
storage  and  are  subsequently  used  to  initialize  all  board  segments. 
Output  Design 

The  output  portion  of  the  design  provides  the  capability  to  obtain  a 
printed  copy  of  all  net  paths  once  the  Lee  or  Vintr  router  has  finished. 
There  are  three  methods  to  do  this.  The  first  method  merely  prints  the 
cell  coordinates  during  the  retracing  of  the  path  following  a  connection 
and  does  not  save  the  path  coordinates  for  later  use  in  Vintr's 
algorithm.  The  second  method  stores  retrace  paths  in  primary  memory  as 
the  p'th  is  retraced.  However,  this  method  uses  valuable  primary 
memory.  The  third  and  favored  method  stores  the  path  on  secondary 
storage  for  later  output  to  a  printer.  The  advantages  of  this  method 
allows  output  of  the  paths  as  in  method  one,  although  not  as  fast  as  in 
method  two,  but  does  not  use  valuable  primary  memory  to  store  the  path. 
Another  significant  advantage  is  that  the  paths  are  permanently  recorded 
for  later  use  in  Vintr's  algorithm.  As  a  path  is  retraced,  the  three 
coordinate  values  for  each  cell  along  the  path  are  saved  to  pin-point 


the  precise  location  of  the  path  on  the  grid.  To  avoid  the  tedious 


aanual  method  of  determining  path  distance,  the  output  routine 
calculates  the  length  of  a  particular  path  as  it  is  printed. 

In  summary,  three-valued  coordinates  for  each  retrace  cell  are  saved 
on  secondary  storage  to  minimize  system  turnaround  time  and  allow  for 
their  use  in  Vlntr's  algorithm.  As  paths  are  printed,  an  internal 
counter  sums  the  number  of  cells  reached  during  the  retrace  process  so 
the  total  path  distance  cun  be  printed. 

Grid  Design  -  Referencing  Cells 

The  strategy  of  how  one  locates  a  cell  in  a  large  array  when  only  a 
sub-portion  of  the  large  array  is  immediately  available  has  a  profound 
effect  on  the  efficiency  of  Lee's  algorithm.  This  dilemma  suggests  two 
representations  of  a  specific  cell  location.  The  first  representation 
is  of  a  cell's  absolute  location  and  Is  shown  in  Figure  3.3. 
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The  absolute  location  of  cell  x  is  (1,2). 
Fig  3.3.  Absolute  cell  location 


(IC  should  be  noted  In  reference  to  cell  coordinates  that  the  first 
coordinate  denotes  the  width  parameter  and  the  second  coordinate  denotes 
the  length  parameter.)  For  example,  if  the  board  dimensions  are  6X6 
cells,  a  cell  can  be  located  simply  by  specifying  its  coordinates. 

The  second  representation  requires  the  coordinates  for  the  cell's 
location  within  a  segment  and  the  coordinates  for  the  segment's  location 
within  the  board.  For  example,  if  only  a  portion  of  the  entire  grid  is 
available  at  one  time,  say  3X3  cells,  a  cell's  location  must  be 
specified  within  the  segment,  and  the  segment  must  be  referenced  with 
respect  to  its  location  on  the  overall  board.  Figure  3.3  references  the 
same  cell  as  in  Figure  3.4  using  segment  coordinates  and  relative  cell 
coordinates. 
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The  relative  location  of  cell  x  is  (2,2)  in  segment  (2,1). 
Fig  3.4.  Relative  cell  location 
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As  cells  are  expanded  and  others  are  reached  during  the  actual 
routing  process,  segment  boundaries  are  crossed.  Consequently,  If  both 
representations  are  kept  In  primary  memory,  the  routing  process  could 
cake  place  using  absolute  coordinates  while  a  second  algorithm  could 
keep  track  of  Che  segment's  coordinates  and  of  Che  cells  within  the 
segment.  Whenever  a  cell  other  chan  Che  current  cell  Is  referenced  due 
to  expansion  or  retrace,  a  check  Is  made  to  determine  If  the  segment  has 
changed.  If  so,  the  grid  management  routine  (to  be  described  later)  Is 
Invoked.  If  Che  segment  has  not  changed,  new  relative  cell  coordinates 
are  calculated  so  the  reached  flag  and  the  retrace  direction  are 
specified  for  Che  proper  cell.  The  use  of  absolute  coordinates  for 
expansion  and  retrace  and  Che  use  of  relative  coordinates  for  access  to 
specific  cell  Information  is  especially  advantageous  during  retrace. 

The  coordinates  of  Che  retrace  path  are  saved  as  absolute  coordinates, 
and  retrace  direction  data  from  a  cell  (referenced  by  its  relative 
coordinates)  Is  used  to  calculate  the  absolute  cell  coordinates  of  the 
next  cell  In  the  retrace  path. 

Lee  Router  Design  -  Algorithm 

The  design  of  Che  Lee  algorithm  used  In  this  project  is  basically  a 
process  of  reading  the  end  cells  of  a  net,  initializing  various  data 
parameters,  expanding  cells  until  a  connection  Is  made  or  is  impossible, 
and  retracing  Che  path  for  a  connected  net.  This  same  process  Is 
repeated  for  each  net.  Figure  3.5  shows  the  overall  design  of  the  Lee 


algorithm 


Fig  3.5.  Lee  algorithm  design 


Lee  Router  Design  -  Initialization 

Upon  entry  Into  the  Lee  algorithm,  the  cells  of  all  segments  must  be 
Initialized.  The  Initialization  process  resets  all  retrace  directions 
to  zero  and  the  reached  flag  to  “not  reached”  for  all  non-obstacle 
cells.  The  obstacle  cells,  at  this  point,  represent  both  physical 
obstacles  and  the  wire  paths  between  cells.  Once  all  segments  have  been 
Initialized,  the  data  lists  for  storing  cells  to  be  expanded  (ELIST)  and 
cells  that  are  reached  during  expansion  (RLIST)  are  also  initialized  so 
that  neither  list  has  any  entries. 

When  a  net  to  be  routed  is  read  from  the  net  file,  its  start  ceil  is 
immediately  stored  in  ELIST  and  the  same  cell  on  side  2  of  the  PCB  is 
stored  in  RLIST.  Once  these  processes  have  taken  place,  the  expansion 
process  continues  until  a  net  is  connected  or  it  is  determined  that  a 
connection  is  impossible. 

Lee  Router  Design  -  Expansion 

The  design  of  the  expansion  process  the  heart  of  the  Lee  algorithm. 


It  is  the  method  of  taking  a  cell  with  specified  coordinates  and 
determining  If  a  path  exists  to  each  adjacent  cell  until  a  connection  is 
made  or  no  paths  exist.  For  any  one  cell  there  is  a  maximum  of  five 


adjacent  cells  which  may  be  reached  on  a  two-layer  PCB.  These  five 
cells'  coordinates  can  be  easily  calculated  from  a  single  cell's 
coordinates.  A  single  cell  has  three  coordinate  values  -  width,  length, 
and  side.  A  fourth  coordinate  value  can  be  calculated  by  adding  "+1”  to 
the  cell's  width  coordinate,  a  fifth  coordinate  value  by  adding  "-I"  to 
the  width  coordinate.  Similarly,  the  sixth  and  seventh  coordinate 
values  can  be  calculated  from  the  cell's  length  coordinate.  The  side 
coordinate  is  trivial  since  it  always  has  a  value  of  "1”  or  "2".  Since 
these  adjacent  coordinates  are  always  calculated  in  the  same  manner, 
they  are  easily  defined.  As  an  example,  if  a  cell  with  location  (x,y,2) 
is  to  be  expanded,  the  five  adjacent  cells  are  defined  below. 

CELL  LOCATION:  (3?,y,z) 

ADJACENT  WIDTH  CELLS:  (x-l,y,z)  and  (x+l,y,z) 

ADJACENT  LENGTH  CELLS:  (x,y-l,z)  and  (x,y+l,z) 

ADJACENT  SIDE  CELL:  (x,y,l)  or  (x,y,2) 

If  the  four  width  and  length  coordinate  values  are  saved,  they  may 
be  easily  used  to  reference  adjacent  cells.  Adjacent  width  cells  are 
defined  by  using  one  of  two  newly  calculated  width  values  to  replace  the 
current  cell's  width  coordinate.  The  adjacent  length-wise  cells  can  be 
referenced  in  a  similar  manner.  By  sequentially  replacing  the  original 
values  by  the  new  values,  all  four  directions  may  be  considered  without 
ever  permanently  changing  the  original  cell  coordinates. 

Initially,  no  cells  have  been  reached  and  the  only  condition  flag 
set  is  the  obstacle  flag  for  the  start/cnd  cells  and  other  obstacle 


cells.  As  the  start  cell  is  expanded  (an  ELIST  entry),  each  adjacent 
cell  that  Is  reached  has  Its  three  coordinates  saved  in  RLIST.  The 
first  expansion  has  at  least  one  cell  that  may  be  reached  unless  the 
connection  is  impossible.  If  more  than  one  cell  is  reached,  each  cell 
is  saved.  When  the  start  cell  has  been  fully  expanded,  the  reached 
cells  are  moved  into  ELIST  and  expanded  one  at  a  time.  To  avoid 
repetitious  expansion  into  the  same  cell,  a  reached  cell  has  its  reached 
flag  set.  Only  available  and  unrcached  cells  are  eligible  to  be 
reached  in  the  expansion  process.  If  a  connection  has  not  been  made  by 
the  time  the  last  ELIST  entry  is  expanded,  the  list  of  reached  cells 
(RLIST)  is  moved  Into  ELIST  and  expanded.  This  process  is  repeated 
until  a  connection  is  made  or  no  further  cells  are  available  for 
expansion.  Once  a  connection  is  made,  the  retrace  procedure  is  invoked. 
If  all  ELIST  entries  have  been  expanded  and  no  RLIST  entries  exist,  the 
net  is  considered  impossible  and  is  saved  in  a  list  (IMPOSLIST). 

Lee  Router  Design  -*  Retrace 

Once  a  connection  has  been  made,  the  path  should  be  retraced.  Since 
a  connection  is  made  with  the  end  cell,  the  retrace  begins  at  the  end 
cell.  The  next  cell  of  the  path  is  calculated  from  the  current  cell's 
absolute  location  and  the  retrace  direction  information  stored  in  the 
current  cell.  When  the  coordinates  of  the  next  cell  are  the  same  as  the 
start  cell's  width  and  length  coordinates,  the  retrace  path  is  complete. 
During  this  process,  each  new  absolute  cell  location  of  the  path  is 
saved  in  the  route  file  and  the  obstacle  flag  for  each  cell  is  set. 

Of  all  the  data  items  within  the  program,  the  items  which  may  use 


more  primary  memory  than  any  others  are  the  retrace  directions.  If 
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negative  values  are  allowed,  each  direction  requires  an  entire  "word"  of 
memory.  With  three  directions  for  each  cell  and  hundreds  of  cells,  it 
is  easy  to  see  the  problem.  To  minimize  storage  for  the  grid  entries, 
the  retrace  directions  are  coded  as  “0",  "1",  or  "2".  Then  if  data 
packing  is  used  in  the  software  implementation,  only  two  bits  are 
required  for  each  of  the  three  retrace  directions.  However,  coding  a 
"2"  (a  "10"  in  binary)  for  a  negative  value  requires  a  check  during 
retrace.  The  check  will  ensure  a  value  of  minus  one  is  actually  added 
to  the  coordinate  in  question  to  obtain  the  next  cell  in  the  retrace 
path.  The  other  two  values,  "0"  and  "1",  can  be  added  directly  to  the 
proper  absolute  coordinates  to  determine  the  next  cell  location  in  the 
retrace  path.  For  this  technique  to  function  properly,  the  retrace 
direction  values  must  be  stored  properly.  As  a  cell  is  expanded  in  one 
direction,  the  cell  reached  must  have  the  value  of  the  opposite 
direction  (from  which  it  was  entered)  stored  in  the  proper  retrace 
direction.  Perhaps  the  easiest  way  to  do  this  and  the  most  foolproof 
way  of  ensuring  the  proper  values  have  been  stored  is  to  "hard-code" 
this  technique  into  the  program. 

Vintr  Router  Design 

Vintr's  router  uses  the  Lee  routing  algorithm  to  do  its  work  but 
requires  some  additional  algorithms  to  function  properly.  Figure  3.6 
shows  the  overall  design  of  Vintr's  algorithm  and  how  it  uses  the  Lee 


algorithm 


Fig  3.6.  Vlncr  algorithm  design 


Once  all  nets  have  been  expanded,  the  route  paths  previously  saved 
to  disk  can  be  used  for  the  first  step  of  the  Vlntr  router.  The  first 
algorithm  is  to  build  a  file  of  path  “tails”.  The  tall  lengths  are 
calculated  from  the  length  of  the  routed  net,  the  percentage  of  each 
path  to  Implement  (10%  In  this  study),  and  the  Iteration.  The  end 
points  of  the  net  are  added  to  the  list  of  tail  cells.  Then  the 
Manhattan  distance  between  each  intervening  cell  along  the  retrace  path 
and  the  start  or  end  cell  Is  compared  with  the  length  of  the  tall  to 
determine  If  the  Intervening  cell  should  be  Included  In  the  tall  list. 
Figure  3.7  shows  an  example  of  a  board  after  the  Lee  algorithm.  Figure 
3.3  shows  the  same  board  after  the  tails  are  built. 


Fig.  3.7.  Example  of  four  routed  nets 


Fig.  3.3.  Example  of  the  tails  for  four  routed  nets 

Intervening  cells  included  in  the  tail  list  are  flagged  as  "unavailable" 
and  those  cells  not  included  are  flagged  as  "available".  This  process 
is  continued  until  tails  are  calculated  for  all  routed  nets. 

When  all  the  tails  have  been  built >  a  second  algorithm  is  executed. 
This  algorithm  attempts  to  find  a  path  for  previously  unrouted  nets. 

The  unrouted  nets  are  expanded  by  the  Lee  algorithm  in  an  effort  to 
increase  the  net  completion  rate.  If  a  net  can  not  be  connected,  it  is 
again  saved  in  the  unrouted  net  list  (IMPOSLIST);  othen/ise,  the  net  and 
all  cells  along  its  retrace  path  are  saved  in  the  route  file  (ROUTFILE). 

At  this  point,  a  third  algorithm  selects  all  of  the  tail  list 
entries  for  the  end  points  of  a  single  net  and  eliminates  the  tails  by 
turning  the  obstacle  flag  off,  making  the  cell  "available".  The  end 
points  of  the  net  are  then  passed  to  the  Lee  algorithm  for  routing. 

This  process  continues  until  all  tails  are  routed.  The  algorithm  then 
begins  the  next  Iteration. 

In  summary,  for  both  the  Lee  and  Vlntr  algorithm,  separate  sets  of 
coordinates  are  maintained  to  identify  a  cell's  location  on  the  grid. 


The  first  set  of  coordinates  Is  used  for  the  absolute  location  of  a 

cell.  The  second  set  of  coordinates  are  used  to  determine  the  relative 

cell  location  based  on  segment  location  and  the  cell  location  within  the 

segment.  Relative  values  are  used  when  scoring  Che  condition  flag  and 

retrace  direction  for  a  specific  cell.  In  the  basic  Lee  algorithm  an 

initialization  procedure  is  performed,  all  possible  directions  of 

expansion  are  attempted,  and  a  list  of  reached  cells  is  constructed. 

The  list  is  Chen  used  for  expansion  after  all  current  cells  have  been 

expanded.  Once  a  connection  is  made,  Che  retrace  procedure  allows 

simple  path  retracing  and  storage  of  the  path.  Vintr's  router  requires 

several  additional  algorithms  to  build  the  tails  of  routed  nets,  to 
/ 

expand  previously  unrouted  nets,  and  to  expand  the  Calls  one  at  a  time. 
Grid  Management  Design 

Two  methods  of  grid  management  can  be  considered  each  with  its  own 
advantages  and  disadvantages.  The  first  method  is  called  Che  grid  I/O 
method  and  the  second  method  is  called  the  grid  vector  method.  The 
method  of  grid  management  is  the  single  most  significant  factor  in 
turnaround  time.  The  first  method,  that  of  grid  I/O,  functions  as 
follows.  Anytime  a  new  cell  is  referenced,  a  check  is  made  to  determine 
if  the  cell  is  located  in  an  adjoining  segment.  If  it  is  not,  no  extra 
work  is  done  except  for  Che  calculation  of  its  relative  coordinates. 
However,  several  actions  are  initiated  if  the  cell  is  in  an  adjoining 
segment.  First,  the  old  segment  is  saved  to  secondary  storage. 

Second,  Che  new  segment  is  loaded  into  memory.  Third,  Che  cell's 
relative  coordinates  in  the  new  segment  are  calculated.  The  difficulty 


with  this  algorithm  arises  when  multiple  cells  along  a  segment  border 


i 


expand  across  segment  boundaries.  This  requires  a  number  of  segment: 
swaps  resulting  in  a  tremendous  amount  of  processing  time  doing  I/O. 

The  advantage  In  this  method  (which  will  become  clearer  from  the 
discussion  of  the  vector  method)  is  in  the  fact  that  the  algorithm 
allows  a  cell  which  could  possibly  make  a  connection  when  it  first 
crosses  a  segment  to  make  the  connection. 

The  grid  vector  method  expands  all  cells  within  a  segment  before 
swapping  segments.  This  method  requires  that  a  "vector"  or  a  list  of 
all  cells  on  a  segment  boundary  be  saved  prior  to  segment  swapping. 
Distances  also  need  to  be  saved  so  that  once  a  new  segment  is  loaded, 
processing  of  the  vector  entries  would  begin  with  those  with  the  shorter 
distance.  The  entries  with  the  shortest  distances  would  be  processed 
one  at  a  time  until  each  path's  distance  was  equal  to  the  longest 
distance  saved  in  the  boundary  vector.  This  ensures  that  a  longer  path 
did  not  make  a  connection  before  a  shorter  path  was  given  an  opportunity 
to  complete  the  connection.  The  significant  advantage  of  this  method 
lies  in  the  fact  that  a  tremendous  number  of  segment  swaps  are 
eliminated  which  reduces  turnaround  time.  However,  there  are 
significant  disadvantages  also.  The  first  disadvantage  is  that 
additional  memory  is  required  to  record  sixty  (two  layer?  cf  thirty 


entries  each)  entries  per  vector  and  the  possibility  of  four  vectors. 

In  addition,  if  two  cells  are  relatively  close  to  each  other  but  in 
different  segments,  much  processing  time  would  be  spent  in  expanding  all 


other  cells  of  a  segment  before  the  connection  could  be  made. 

In  summary,  the  two  grid  management  methods  will  determine  overall 


processing  time.  Each  has  its  own  advantages  and  disadvantages.  One 
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method  (I/O)  will  make  a  connection  with  a  fewer  total  number  of  cell 
expansions  but  with  a  price  of  high  I/O.  The  other  method  (vector) 
requires  a  larger  number  of  cell  expansions  and  larger  amount  of  primary 
memory  but  refrains  from  any  I/O  until  a  segment  swap  is  absolutely 
necessary. 

Expansion  List  Sort  Design 

The  primary  reason  for  these  algorithms  is  to  expand  cells  closest 
to  the  target  cell  first  and  to  expand  all  cells  that  have  been  reached 
in  a  specific  segment  before  segments  are  swapped.  This  method  provides 
some  assurance  that  the  target  cell  is  reached  as  soon  as  possible  and 
with  a  reduction  in  the  number  of  segment  swaps.  The  first  algorithm 
sorts  the  cells  reached  during  a  particular  expansion  into  ascending 
Manhattan  distance  sequence.  The  Manhattan  distance  is  then  calculated 
from  the  cell's  current  position  to  the  end  or  target  cell's  position. 
The  advantage  here  is  that  for  long  paths,  there  may  be  100+  cells 
reached,  and  the  cell  closest  to  the  target  cell  may  be  at  the  end  of 
the  list.  Clearly,  it  would  be  a  waste  of  time  and  resources  to  process 
all  others  first  before  making  the  connection.  A  second  algorithm  uses 
this  sorted  list  to  reduce  the  number  of  segment  swaps.  The  second 
algorithm  uses  the  first  entry  of  the  sorted  list  and  calculates  which 
segment  it  is  located  in,  then  searches  the  remainder  of  the  list  for 
other  entries  in  the  same  segment.  When  all  entries  have  been  checked, 
the  next  closest  entry  is  selected  and  its  segment  is  calculated.  This 
process  is  repeated  until  no  "reached"  cells  remain.  The  resulting 
expansion  list  (ELIST)  has  entries  sorted  by  segment  which  is  based  on 
Che  cell  closest  to  the  target  cell.  This  method  will  reduce  some  of 
the  segment  swaps  during  expansion. 
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Summary 

The  design  of  several  routines  had  to  be  considered  before  any 
program  Implementation  could  begin.  A  routine  had  to  bo  devised  to 
handle  cell  location  within  a  segment  for  a  multl~segmented  grid. 
Routines  had  to  be  designed  Co  Input  and  output  data  files  and  to 
Initialize  the  segments  for  obstacle  cells  and  the  end  points  for  all 
nets.  A  routine  was  required  to  expand  cells  and  mark  their  retrace 
directions  and,  once  a  connection  was  made,  a  separate  routine  had  to 
find  the  path  back  to  the  start  cell.  During  Che  expansion  process, 
routines  had  to  be  developed  to  reduce  Che  number  of  disk  I/O  and  to 


first  expand  those  cells  closest  to  the  end  cell. 


Procedure 

Four  data  sets  were  created  with  20,  40,  60,  and  80  randomly 
created  two-point  nets.  Each  net  was  created  independently.  Some 
characteristics  of  these  data  sets  arc  shown  in  Table  A.  Mo  obstacle 
cells  were  entered  in  any  of  the  board  configurations  prior  to  routing. 


TABLE  A 

Characteristics  of  the  data  sets  used  in  analysis 

Mumber  of  2-Point  Mets 
20  40  60  30 

Minimum  Net  Length  (cells)  9656 

Maximum  Net  Length  (cells)  73  107  85  69 

Average  Net  Length  (cells)  38.2  40.2  39.4  35.5 

The  nets  in  each  data  set  were  sorted  and  stored  by  ascending  and 
descending  Manhattan  distance.  Thus,  eight  data  sets  were  actually 
created  and  used  for  the  analysis  presented  here.  Ail  data  sets  were 
saved  to  floppy  disk.  Each  data  set  required  no  more  than  one  block  of 
storage,  while  each  segment  required  15  blocks  of  storage.  Temporary 
storage  files  and  intermediate  route  files  were  created  and  purged 
during  program  execution  and,  thus,  their  size  could  not  be  easily 
determined. 

To  execute  the  main  program,  all  files  associated  with  a  specific 
data  set  were  loaded  into  the  RAM  curd.  The  program  was  then  started 


and  the  clock  time  noted.  At  the  completion  of  the  program,  the  time 


was  noted  and  all  files  in  the  RAM  card  were  saved  to  floppy  diskette 
These  results  are  shown  in  Table  C  and  discussed  in  the  next  section. 


At  the  end  of  the  Lee  router  and  each  iteration  of  Vintr's  router 
(where  each  Iteration  of  Vintr's  router  performs  the  Lee  algorithm  with 
an  Increase  in  tail  length  of  10%,  see  Table  B),  the  path  for  each 
successful  connection  and  its  Manhattan  distance  was  printed. 


TABLE  B 

Percent  of  route  path  used  to  calculate  tails 


STEP 

TAIL  LEN( 

LEE 

0% 

VINTR 

#1 

10% 

VINTR 

#2 

20% 

VIHTR 

;?3 

30% 

VINTR 

40% 

Each  Manhattan  distance  was  subsequently  entered  into  a  calculator  to 
obtain  the  mean  and  range  of  routed  distances  for  each  data  set.  This 
data  is  shown  in  Tables  D  through  K  and  discussed  in  the  following 
sections. 

Output  File  Size  and  Processing  Tine 

Table  C  shows  the  results  of  output  file  size  and  processing  time 
for  all  eight  data  sets  by  net-size  and  the  routing  of  short  vs.  long 
nets.  Short  nets  are  the  data  sets  sorted  in  ascending  Manhattan 
distance,  and  long  nets  arc  the  data  sets  sorted  in  descending  Manhattan 
distance.  End-of-program  output  file  sizes  for  the  various  data  sets 


Tabic  C 

Results  for  output  file  size  and  processing  tlm^ 


Size 

of  2- 

Point 

Mets 

Short 

First 

Long 

First 

20 

40 

60 

80 

20 

40 

60  30 

Output  File  Size  (Blks) 

7 

14 

26 

28 

7 

15 

24  29 

Processing  Tine  (Hrs) 

71 

.3  124 

131.2 

155 

77 

136.5 

150.4  133.3 

were  variable  and  tended  to  level  off  in  the  24-29  block  range  for  the 
four  largest  data  sets.  This  is  due  to  the  substantially  higher  number 
of  unrouted  nets  in  the  80  net  data  sets.  Figure  4.1  shows  the  increase 
in  output  file  size  over  data  set  size. 


Fig.  4.1.  Output  File  Size  Results 


■J  i 


As  can  ba  seen  from  Figure  4.2,  the  processing  time  was  substantial 
ranging  from  71.8  to  155  hours  per  run  of  a  data  set.  The  increase  is 
due  largely  to  the  increase  in  the  number  of  nets  to  be  routed  and  the 
resulting  increase  in  routing  congestion.  The  time  nearly  doubled  goin; 
from  20  to  40  nets  as  would  be  expected  on  a  relatively  uncongestcd 
board.  VJith  congestion  though,  the  time  began  to  peak  in  the  135-155 
hour  range.  This  is  explained  by  the  fact  that  as  more  obstacles  are 
encountered  in  the  expansion  process,  fewer  cells  are  reached.  It  is 
interesting  to  note  for  all  data  sets,  except  the  two  largest  data  sets, 
less  time  was  required  to  route  the  shortest  connections  first.  In 
processing  the  longer  nets  first  of  the  largest  data  set,  there  were 
about  26Z  more  unrouted  nets  for  each  iteration  than  when  the  shorter 


nets  were  processed  first.  These  additional,  mirouted  nets  were 
probably  flagged  as  impossible  early  in  the  routing  process  to  achieve 
such  a  low  processing  time. 

Output  Results  and  Analysis  -  20  Nets 

Tables  D  and  E  show  the  results  for  20  nets  by  iteration  for  routing 
shortest  and  longest  nets  first,  respectively.  For  each  type  of 
processing  (shortest  vs.  longest),  all  nets  were  routed  using  the  Lee 
algorithm.  Consequently,  no  improvement  was  observed  using  Vintr's 
algorithm.  It  is  interesting  that  even  though  the  average  route  length 
was  slightly  longer  when  processing  the  longest  nets  first,  tlie  maximum 
path  distance  was  several  units  less.  Apparently,  longer  nets  were 
closer  to  their  minimum  Manhattan  distances  and  shorter  nets  were 
longer  due  to  the  obstructions  generated  by  the  longer  nets.  When  tlie 
shorter  nets  were  processed  first,  they  achieved  their  minimum  distance 
with  longer  nets  requiring  longer  paths  to  make  a  connection. 


20  Nets 

Mlnimur.i  Met  Lengtli  (cells) 
Maximum  Net  Length  (cells) 
Average  Net  Length  (cells) 
Number  of  Unrouted  Nets 


Table  D 

(shortest  routed  first) 


Iteration 


Lee 

1 

2 

1 

4 

0 

9 

9 

9 

9 

82 

82 

82 

32 

82 

39.2 

39.2 

39.2 

39.2 

39.2 

0 

0 

0 

0 

0 

Completed 


100.0  100. 0  100.0  100.0  mo.o 


Table  E 


20  Nets  (longest  routed  first) 
Iteration 


Lee 

1 

2 

3 

4 

Minimum  Net  Length 

(cells) 

9 

9 

9 

9 

9 

Maximum  Net  Length 

(cells) 

79 

79 

79 

79 

79 

Average  Net  Length 

(cells) 

39.6 

39.6 

39.6 

39.6 

39.6 

Number  of  Unrouted 

Nets 

0 

0 

0 

0 

0 

Z  Completed 

100.0 

100.0 

100.0 

100.0 

100.0 

However,  the  minimum,  average,  and  maximum  route  lengths  in  both  methods 
of  processing  very  nearly  equalled  their  starting  statistics.  This 
condition  indicates  the  net  end  points  were  sufficiently  distributed, 
and  the  board  was  large  enough  that  congestion  was  not  a  problem. 


OuCduC  Results  and  Analysis  -  40  Nets 


The  results  for  the  40  net  data  secs  are  shown  In  Table  F  for 
shortest  nets  routed  first  and  in  Table  G  for  longest  nets  routed  first 
Again  we  see  a  100%  completion  rate.  It  is  also  interesting  to  note 
chat  the  processing  of  longest  nets  first  resulted  in  a  shorter  maximum 


Table  F 

40  Nets  (shortest  routed  first) 
Iteration 


Minimum  Net  Length  (cells) 


Number  of  Unrouted  Nets 
%  Completed 


Lee 

1 

2 

3 

4 

6 

6 

6 

6 

6 

109 

109 

109 

109 

109 

42.0 

42.0 

42.0 

42.0 

42.0 

0 

0 

0 

0 

0 

100.0 

100.0 

100.0 

100.0 

100.0 

Table  G 

40  Nets  (longest  routed  first) 
Iteration 


Minimum  Net  Length  (cells) 
Maximum  Net  Length  (cells) 
Average  Net  Length  (cells) 
Number  of  Unrouted  Nets 
%  Completed 


Lee 

1 

2 

3 

4 

11 

11 

11 

11 

11 

107 

107 

107 

107 

107 

44.5  44.5  44.5  44.5  44.5 


100.0  100. 0  100. 0  100. 0  100,0 


route  length  than  did  the  processing  of  the  shortest  nets.  Also,  the 
number  of  nets  to  be  routed  does  not  congest  the  board  enough  to  really 
affect  the  path  lengths.  The  difference  between  the  minimum  possible 
length  and  the  average  route  length  of  a  net  when  shortest  nets  were 
routed  first  was  only  an  Increase  of  1.8  cells.  This  value  increased  to 
4.3  cells  when  routing  the  longest  nets  first.  Thus,  the  cost  for 
routing  the  longest  nets  first  is  an  increase  in  the  path  length  of  the 
shorter  nets,  and  path  lengths  increase  to  the  extent  that  the  average 
route  length  Increases  significantly,  especially  as  board  congestion 
increases. 

Output  Results  and  Analysis  -  60  Nets 

Tables  H  and  I  show  the  results  of  applying  Vintr's  algorithm  on  the 
60  net  data  sets  for  routing  shortest  and  longest  nets  first, 
respectively.  These  data  sets  were  the  first  to  show  the  usefulness  of 
Vintr's  algorithm.  In  routing  the  shortest  nets  first,  only  one  net 

Table  H 

60  Nets  (shortest  routed  first) 


Lee 

Iteration 

1  2  3 

4 

Minimum  Net  Length 

(cells) 

5 

5 

5 

5 

5 

Maximum  Net  Length 

(cells) 

125 

90 

116 

177 

155 

Average  Net  Length 

(cells) 

44.6 

39.3 

48.8 

51.1 

53.4 

Number  of  Unrouted 

Nets 

1 

8 

5 

4 

0 

Z  Completed 


98.3 


86.7  91.7  93.3  100. 0 


Table  I 


60  Nets  (longest  routed  first) 

Iteration 

Lee  12  3  4 

Minimum  Net  LengtVi  (cells)  5  7  5  5  5 

Maximum  Net  Length  (cells)  180  136  127  148  123 

Average  Net  Length  (cells)  55.7  55.7  49.5  50.7  49.8 

Number  of  Unrouted  Nets  79511 

%  Completed  33.3  85.0  91.7  98.3  98.3 

could  not  be  routed.  Only  after  an  increase  in  unrouted  nets,  as  shown 
in  Figure  4.3,  was  the  Vintr  algorithm  able  to  complete  all  connections 
Surprisingly,  the  early  iterations  of  Vintr's  algorithm  showed  a 


Figure  4.3.  Unrouted  Nets  for  60/30  Net  Data  Sets 


significanc  non-conpletion  rate  (see  Table  H).  This  hump  effect  (see 
Figure  4.3,  a  chart  of  the  data  in  Table  G)  is  apparently  due  to  the 
following  sequence  of  actions.  At  the  start  of  each  iteration  in 
Vintr's  algorithm,  unrouted  nets  are  routed  first.  In  this  way,  the 
newly  routed  nets  force  other  nets  to  take  a  more  circuitous  path,  and 
only  whan  less  congestion  is  encountered  are  the  previously  routed  nets 
more  likely  to  find  a  connection.  The  construction  of  tails  Increases  a 
net's  chance  to  find  a  path,  and  until  a  net  finds  a  path  outside  the 
congestion,  additional  nets  may  not  be  routed. 

The  average  route  lengths  increased  dramatically  from  the  starting 
lengths  as  shown  in  Figure  4.4.  Obviously,  congestion  played  a  major 


Figure  4.4.  Average  Route  Length  for  50/80  Ket  Data  Sets 


part  in  the  processing  of  this  data.  One  interesting  observation  when 
routing  longer  nets  first  is  there  appeared  to  be  an  improvement  in  both 
the  maximum  and  average  route  lengths  for  the  final  two  iterations. 

This  apparent  improvement  was  due  to  the  fact  that  the  unroutcd  net  in 
iteration  three  was  different  than  the  one  in  iteration  four.  The 
unrouted  net  in  the  last  iteration  caused  less  congestion  than  the 
preceding  net. 

Output  Results  and  Analysis  ~  80  Nets 

Table  J  shows  the  results  for  80  nets  with  shortest  nets  routed 
first  versus  Table  K  which  shows  the  results  of  the  same  data  set 
ordered  by  longest  nets  first.  It  is  clear  from  this  data  that  the 
board  was  heavily  congested.  For  routing  shortest  nets  first,  there  was 
no  improvement  in  unrouted  nets 'by  Vintr's  algorithm.  In  fact,  the 
improvement  seen  was  in  the  decrease  in  maximum  net  length. 

Table  J 

80  Nets  (shortest  routed  first) 

Iteration 


Lee 

1 

2 

3 

4 

Minimum  Net  Length 

(cells) 

6 

6 

6 

5 

6 

Maximum  Net  Length 

(cells) 

201 

138 

159 

233 

162 

Average  Net  Length 

(cells) 

43.1 

45.7 

49.2 

51.5 

48.9 

Number  of  Onrouted 

Nets 

11 

10 

17 

21 

11 

%  Completed 

86.3 

87.5 

73.8 

73.8 

86.3 

Table  K 


80  Nets  (longest  routed  first) 
Iteration 


Lee 

1 

2 

3 

4 

Minimum  Net  Length 

(cells) 

6 

3 

10 

8 

6 

Maximum  Net  Length 

(cells) 

155 

169 

181 

220 

242 

Average  Net  Length 

(cells) 

55.4 

48.7 

51.3 

50.9 

54.2 

Number  of  Unrouted 

Nets 

24 

19 

20 

18 

14 

%  Completed 

70.0 

76.3 

75.0 

77.5 

32.5 

The  "hump"  effect  can  be  seen  when  routing  the  shortest  nets  first  (as 
seen  in  Figure  4.3),  and  the  result  was  an  86.3%  completion  rate.  In 
routing  longest  nets  first,  the  number  of  unrouted  nets  began  high  and 
slowly  Improved  with  a  completion  rate  of  82.5%.  For  those  iterations 
where  the  least  number  of  unrouted  nets  occurred,  only  about  21%  of  all 
possible  cells  on  the  entire  board  were  used.  This  suggests  perhaps  the 
"random"  generation  of  data  points  actually  resulted  in  data  being 
somewhat  "grouped"  on  the  board.  Nets  having  an  end  point  near  the 
center  of  the  "group"  would  have  the  greatest  difficulty  finding  a  path. 

It  is  clear  from  Figure  4.4  that  the  average  route  length  for  these 
two  data  sets  is  difficult  to  analyze  since  there  is  a  great  amount  of 
congestion.  When  routing  short  nets  first,  a  comparison  between  the 
results  of  Lee's  algorithm  and  the  last  iteration  of  Vintr's  algorithm 
shows  a  significant  decrease  in  the  maximum  net  length  and  the  average 
net  length.  On  the  other  hand,  when  routing  longer  nets  first,  the 
average  route  length  only  slightly  decreased,  but  the  maximum  net  length 

increased  significantly  as  a  much  better  completion  rate  was  achieved. 
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Summary 

The  Lee  algorithm  worked  very  well  with  uncongested  boards.  Wiien 
congestion  Increased  to  the  point  where  even  Vintr's  router  could  not 
reduce  the  number  of  unrouted  nets  to  zero,  Vintr's  algorithm  was  able 
to  Improved  the  completion  rate.  It  appears  the  maximum  number  of  cells 
to  be  connected  was  around  65-70  using  a  random  generation  method  of 
producing  input  data.  For  data  secs  of  60  and  80  nets,  the  better 
completion  rate  occurred  with  the  processing  of  the  shorter  connections 
first. 

In  all  cases,  Vintr's  algorithm  gave  results  Chat  were  as  good  or 
better  chan  Lee's  algorithm.  In  most  cases,  Vintr's  algorithm  gave 
significant  improvements  in  routing  completion  and  average  net  length, 
it  appears  chat  the  number  of  long  nets  in  a  data  sec  will  significantly 
impair  the  ability  of  Vintr's  router  to  successfully  route  all  nets. 

Improvement,  even  Chough  feasible,  will  come  at  a  significant 
processing  cost.  In  general,  Vintr's  algorithm  required  I*L  processing 
time  where  I  is  Che  number  of  iterations,  and  L  is  the  length  of  time  to 


route  nets  using  Che  Lee  algorithm. 


V.  Conclusions  and  Recommendations 

Conclusions 

The  most  significant  observation  in  this  work  Is  the  fact  that 
design  automation  using  d-bit  microcomputers  is  unrealistic.  The  6302 
processor  Is  very  slow  running  about  1  MHz.  With  the  constraint  of  64K 
primary  memory  only  small  sections  of  a  printed  circuit  board  can  be 
available  at  a  time,  in  this  case  only  a  3X3  inch  segment.  With  the 
processing  of  larger  boards  1/0  becomes  of  Increasing  importance  In  the 
execution  speed  of  the  algorithms.  In  addition,  due  to  the  segment 
swapping,  algorithms  were  required  to  detect  board  se^^ent  changes  and 
to  convert  absolute  coordinates  to  relative  coordinates  on  a  continual 
basis.  Even  with  faster  processing  speeds  and  either  RAM  disk  or  hard 
disk  for  secondary  storage,  Che  amount  of  I/O  and  the  amount  of  time  to 
consider  all  possible  routes  results  in  a  substantially  slower 
application.  The  size  of  Che  board  in  this  case  was  only  6X6  inches. 
Initial  testing  of  a  board  8X12  inches  with  30  two-point  nets  was  taking 
well  beyond  a  week.  This  situation  is  entirely  unacceptable  in  an 
environment  where  students  require  faster  turnaround. 

The  Lee  algorithm  produced  Che  minimum  length  path  in  all  cases 
unless  congestion  Impeded  Che  expansion  process.  The  Vintr  algorithm 
worked  as  advertised  but  there  seemed  to  be  a  fairly  narrow  range  of 
data  set  size  that  really  allowed  the  algorithm  to  do  its  work.  On  one 
extreme,  all  nets  were  connected  on  the  first  execution  of  Lee's 
algorithm  and  subsequent  execution  of  Vintr's  algorithm  did  not  reduce 
the  average  route  length.  On  the  other  extreme,  the  board  became  so 
congested  Chat  it  was  difficult  to  predict,  let  alone  expect,  Che  number 


c 


of  unrouted  nets  to  decrease.  One  fact  is  for  certain  though,  Vintr's 
algorithm  will  result  in  a  fewer  number  of  unrouted  nets  at  the  expense 
of  processing  time. 

A  reduction  of  the  overall  processing  time  should  be  expected  if  a 
16-bit  microcomputer  is  employed  to  accomplish  the  expansion  process.  A 
faster  processor  should  significantly  speed  up  processing  and  the 
increased  range  of  memory  addressing  would  allow  much  larger  sections  or 
an  entire  printed  circuit  board  to  reside  in  memory  at  one  time.  This 
would  eliminate  the  algorithms  devoted  to  segment  swapping  and  for  the 
conversion  of  absolute  coordinates.  Potentially,  a  75*  reduction  in 
processing  time  might  be  observed  using  this  program  with  different 
hardware  configurations.  Vintr's  algorithm  could  be  a  viable  approach 
if  hardware  specifically  tailored  for  routing  algorithms  or  design 
automation  (similar  to  a  database  machine)  were  used. 

In  addition,  if  the  pin  data  for  the  layout  of  actual  chips  was 
used,  the  net's  end  points  should  be  more  uniformly  distributed  on  the 
board.  Consequently,  some  of  the  congestion  should  be  eliminated. 

Varying  the  method  of  processing  might  also  bring  unexpected 
results.  In  the  data  sets  where  all  connection  were  made,  Vintr's 
algorithm  did  not  affect  the  routes,  but  if  the  routing  method  was 
alternated  from  shortest  processed  first  to  longest  processed  first, 
different  results  migiit  be  observed. 

Recommendations 

No  further  research  is  recommended  unless  a  more  powerful 


microcomputer  can  be  used  to  study  the  effects  of  Vintr's  algorithm.  At 
best  this  research  could  provide  an  introduction  to  the  routing  process 


for  students  and  the  algorlthnis  could  be  studied  by  students  and 
improved  upon.  However,  for  true  research  purposes  a  larger-scale 
computer  system  is  required  to  lower  processing  times  to  a  tolerable 
level.  The  results  of  varying  the  length  of  tails  and  the  number  of 
Iterations  during  Vlntr's  algorithm  might  prove  interesting  or 
significant. 
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START  INTRSTUB 


. V . 

INPUT  NAME  OF  NET  FILE 

BUILD  FILENAME 

OPEN  INTRFILE  FOR  WRITING 


.< . 

V 

N  . 

.  MORE 

.DATA  . 

.  Y 

. V . 

.  SET  REDO  TO  TRUE  . 


< 


.  .  INPUT  WIDTH,  LENGTH  COORD. 

.  .  FOR  START/END  CELLS 

.  .  DO  NOT  ACCEPT  VALUE  UNTIL 

.  .  WITHIN  LIMITS  OF  PROGRAM 

.  .  ENTER  "Y"  TO  REDO  OR  ”N"  TO 

.  .  ACCEPT 

V  . 

.  Y 

REDO  . 


• 

V . 

.  SAVE  INTRFILE  ENTRY  TO  DISK  . 
.  ENTER  "Y"  FOR  MORE  OR  "N" 

.  TO  FINISH 


N 


. V . 

.  PURGE  INTRFILE  . 


V 

.  Y 

SAVE  . 

DATA. 

.  . V . 

.  CLOSE  INTRFILE  . 


START  INITBORD 


. V . 

INITIALIZE  EACH  BOARD  SEGMENT  WITH  ALL  DIR 
ENTRIES  SET  TO  0  AND  RCH  FLAG  SET  TO 
FALSE 

READ  EACH  INTRFILE  ENTRY 
PROCEDURE  CALCFILE  2.1 

FOR  EACH  CELL  IN  INTRFILE,  SET  THE  CELL'S 
OBS  FLAG  ON 
SAVE  SEGMENT  TO  DISK 


. V . 

.  END  INITBORD  . 


Procedure  2.0  -  INITBORD 
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START  CALCFILE 
II;  WIDTH 
12;  LENGTH 


CALCULATE  NEW  SEGMENT  WIDTH  AND 
NEW  LENGTH  USINGG  12 
COMPARE  NEW  SEGMENT  COORD.  WITH 
CURRENT  SEGMENT  COORD. 


OPEN,  WRITE,  CLOSE  CURRENT  SEGMENT 
SAVE  NEW  SEGMENT  COORD.  AS  CURRENT  COORD 
USE  NEW  COORD.  AND  BUILD  NEW  SEGMENT 
FILENAME 

OPEN,  READ  CURRENT  SEGMENT 
PURGE  CURRENT  DISK  FILE 


CALCULATE  NEW  RELATIVE  WIDTH  COORD.  USING  II 
CALCULATE  NEW  RELATIVE  LENGTH  COORIi.  USING  12 


END  CALCFILE  . 


Procedure  2.1  -  CALCFILE 


START  LEE 


. V . 

.  GET  INTRFILE  ENTRY  . 


. V . 

PRINT  NUMBER  OF 

UNROUTABLE 

CONNECTIONS 


. V . 

PROCEDURE  INIT  1 . 1 


. V . 

READ  INTRFILE 
ASSIGN  START  COORD  TO 
BW.  BL  AND  END  COORD. 
TO  EW,  EL 

ASSIGN  SIDE  1  START 
COORD.  TO  EL I ST  AND 
SIDE  2  COORD.  TO  RLIST 


. V . 

PROCEDURE  CALCFILE 
I;  START  COORDS.  1.2 


.  SET  LAYER  RETRACE  DIR  OF. 
.  SIDE  2  CELL  TO  2 


SUBPROCEDURE  LEE  1.3 


START  CALCFILE 
II;  WIDTH 
12;  LENGTH 


. V . 

CALCULATE  NEW  SEGMENT  WIDTH  AND 
NEW  LENGTH  USINGG  12 
COMPARE  NEW  SEGMENT  COORD.  WITH 
CURRENT  SEGMENT  COORD. 


N  V 


.  Y 

. V . 

.  OPEN,  WRITE,  CLOSE  CURRENT  SEGMENT 
.  SAVE  NEW  SEGMENT  COORD.  AS  CURRENT  COORD 
.  USE  NEW  COORD.  AND  BUILD  NEW  SEGMENT 
.  FILENAME 

.  OPEN,  READ  CURRENT  SEGMENT 
.  PURGE  CURRENT  DISK  FILE 


. V . 

.  CALCULATE  NEW  RELATIVE  WIDTH  COORD.  USING  II  . 
.  CALCULATE  NEW  RELATIVE  LEIWTH  COORD.  USING  12  . 


START  SUB-LEE 


. . . V . 

.  CHECK  SETTING  OF  OBSTACLE  AND  IMPOSSIBLE  FLAGS  . 


V 

N  .  .  Y 

....  NOT  . 

.SET.  .< 


. V . 

.  READ  NEXT  ELIST  ENTRY  . 


V 

•  • 

N  .  NOT  . 

..  CONNECTED  . 


• 

.  Y 

. V . 

CALCULATE  ADJACENT  CELL 
COORDS. 

PROCEDURE  EXPCK1/EXPCK2 
1.3.1 


. >...< . 

V 

.  .  N 

.  ELIST  . 

.EOF. 

.  Y 

. V . 

.  PROCEDURE  RCHECK  1.3.2  . 


>...< 


. V . 

.  END  SUB-LEE  . 


Sub-Procedure  1.3  -  LEE 


Procedure  1.3.1  -  EXPCK1/EXPCK.2 


START  EXPAND 


. V . 

GET  WIDTH,  LENGTH,  SIDE  COORDS. 
COMPARE  WIDTH  WITH  END  WIDTH 
AND  LENGTH  WITH  END  LENGTH 


Y  V  N 


. V . 

SET  NUMBER  OF  RLIST  . 

ENTRIES  TO  1  . 

SET  CELL'S  RCH  FLAG  . 

SET  CONNECT  FLAG  .  . V . 

.  .  CHECK  CELL'S  OBSTACLE 

.  FLAG 


Y  V 

•  • 

•  • 

• 

.  N 

•  • 

4  • 

0  • 

•  • 

•  • 

. V . 

.  SET  RCH  FLAG 
.  ADD  1  TO  NUMBER  OF  RLIST. 
.  ENTRIES 

.  STORE  COORDS.  IN  RLIST  . 

«  • 

• 

•  • 

• 

. V . 

.  END  EXPAND  . 


Procedure  I. 3. 1.1  “  EXPAND 


START  RCHECK 


CHECK  FOR  EMPTY  RLIST  . 


.  .  N 

EMPTY  ... 


ADD  E  START/END  COORDS.  . 

IN  IMPOSLIST 
ADD  1  TO  NUMBER 
NOT  ROUTED 
SET  COKNFCT  FLAG  ON 


CHECK  CONNECTED  FLAG 


Y  V  N 

. . .  SET  . . 


PROCEDURE  RETRACE 
1.3. 2.1 


.  .  PROCEDURE  SORTLIST  1.3. 2. 2 


.  PROCEDURE  SORTSEG  1.3. 2. 3 
.  SAVE  NUMBER  OF  RLIST  ENTRIES  AOT 
.  THEN  SET  TO  0 


.  ^ ^  < 


END  RCHECK  . 


Procedure  1.3.2  -  RCHECK 
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START  SAVEROUT 


. V . 

INPUT  WIDTH,  LENGTH,  SIDE  COORD. 
LOAD  ROUTFILE  ENTRY  WITH  COORDS. 
SAVE  ENTRY  TO  DISK 


. V . 

.  END  SAVEROUT  . 


Procedure  1.3.2. l.l  ~  SAVEROUT 


START  SORTLIST 


. V . 

.  SET  SWITCH  TO  TRUE 


« ^  • 

V 

N  .  .  Y 

. . .  SWITCH 


. V . 

.  SET  INDEX  TO  NUMBER  OF  RUST  ENTRIES. 
.  SET  SWITCH  TO  FALSE 


. V . 

.  CHECK  IF  INDEX  EQUALS  2  . 


Y  V 


.  N 

. V . 

CALCULATE  MANHATTAN  DISTANCE  FROM  CURRENT 
COORD.  TO  END  COORD.  FOR  CURRENT  RLIST  ENTRY 
(SI)  AfJD  PRECEDING  RLIST  ENTRY  (S2) 


. 

V 

N 

.  SI<S2  . 

.  . 

.  Y 

. V. . 

.  SWITCH  TO  TRUE.  EXHANGE  POSITION  OF 
.  RLIST  ENTRIES.  DECREMENT  lOTEX  3Y  1. 


>...< 


>...< 


. V . 

.  END  SORTLIST  . 

/ 


START  SORTSEG 


. V . 

.  SET  ELIST  INDEX  TO  0  . 


.< . 

. V . 

.  SET  TNUM  TO  NUMBER  OF  RLIST  ENTRIES  . 


V 

N  .  .  Y 

. . .  TNUM>0 


. V . 

SET  RLIST  INDEX  TO  0.  READ  FIRST 
RLIST  ENTRY  AND  SAVE  IN  ELIST. 
CALCULATE  SEGMEOT  COORD.  ANT)  LOAD 
IN  CURSl  (WIDTH)  AND  CURS2 
(LENGTH). 


. >. 

. V . 

.  READ  NEXT  RLIST 


N  V  Y 

. END  . 

•  • 

. V . 

.  CALCULATE  SEGMENT  COORD.  AND  COMPARE  WITH  . 
.  CURSl  AND  CURS2 


N  V  Y 
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ENTRY  IN  LOWEST  AVAIL-  .  .  ENTRY  IN  ELIST. 

ABLE  RLIST  ENTRY  . 
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. V . 
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Procedure  I. 3. 2. 3  -  SORTSEG 
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Procedure  2.1  -  ROUTLEN 
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Procedure  2.2  -  BLDTAIL 
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FILE  1.2 
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GET  NEXT  TAILLIST 


PURGE  TAILLIST 
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OPEN,  WRITE,  CLOSE  BORDFILE 

CLOSE  INTRFILE 

OPEN  INTRFILE 

PROCEDURE  LEE  1.0 

CLOSE  INTRFILE 

GET  NEXT  TAILLIST 


END  SUB-ROUTVNTR  . 


Procedure  2.3.1  -  SUB-ROUTVNTR 
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START  DISPLAY 
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.  CHECK  FOR  BEG  -  “C"  . 
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.  INITIALIZE  LENGTH  COUNTER  TO  -2 
.  LOAD  START  ENTRY  WITH  ROUTFILE  ENTRY 
.  SET  BEG  TO  "Y” 
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ADD  1  TO  LENGTH 
PRINT  ROUTFILE  COORD. 

CHECK  IF  ROUTFILE  ENTRY  «  START  ENTRY 
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.  END  DISPLAY  . 


Procedure  3.1  -  DISPLAY 


Program 

Program  DATASTOB  allows  input  of  cell  coordinates  and  definition 
of  additional  obstacle  cells.  Uhen  the  user  is  finished  with 
entering  data,  it  can  be  saved  to  floppy  diskette  and  the  board 
initialized. 

Inputs  -  (1)  an  interconnection  file  (INTRFILE)  with  start  and  end 

width/length  coordinates. 

(2)  individual  board  segments  (GRIDDATA)  as  required. 

Outputs  -  (1)  updated  Individual  board  segments  (GRIDDATA). 

Constants 

MAXSEGWD,  MAXSEGLN  -  these  values  define  the  number  of  segments  along 
the  width  and  length  of  the  board,  respectively.  Together,  they 
define  the  overall  board  dimensions.  To  increase  the  board 
dimensions,  merely  Increase  these  values. 

Array  Types 

INTRDATA  -  a  4X1  packed  array  storing  integer  values  of  0..60.  The 
values  represent  coordinate  values.  Element  1  Is  the  start 
width,  element  2  is  the  start  length,  element  3  is  the  stop  width, 
and  element  4  Is  the  stop  length. 

GRIDDATA  -  a  30X30X2  packed  array  of  RECDATA.  Each  specific  element 
of  the  array  corresponds  to  a  specific  position  in  a  single  board 
segment. 

Record  Type 

RECDATA  -  each  cell  is  represented  by  a  single  record.  Each 

record  has  two  flags  and  a  3X1  packed  array  storing  Integer  values 
of  0..2.  The  first  flag  is  OBS  and  designates  whether  or  not  the 
cell  is  an  obstacle.  The  second  flag  is  RCH  and  designates  whether 
or  not  the  cell  has  been  previously  reached  during  the  current  cell 
expansion  phase.  The  3X1  array  (DIR)  represents  the  integer  values 
required  for  retrace  once  the  end  cell  has  been  reached.  The  first 
element  of  DIR  is  the  width  retrace  direction,  the  second  element  of 
DIR  is  the  length  retrace  direction,  and  the  third  element  of  DIR  is 
the  side  retrace  direction.  A  value  of  0  signifies  no  change,  1 
signifies  a  +l  change,  and  2  signifies  a  -I  change  in  the  present 
coordinate  position.  These  values  are  added  to  the  current 
coordinates  to  achieve  the  next  retrace  cell.  Note  that  only  one 
direction  parameter  should  ever  be  non-zero. 
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Variables 

INTRFILE  -  a  secondary  storage  file  of  INTRDATA.  Entries  are  the 
width/length  coordinates  of  the  net's  end  cells  to  be  connected. 

INTR  -  the  coordinates  of  a  net's  end  cells. 

BORDFILE  -  a  secondary  storage  file  of  GRIDDATA.  Each  file  is  a 
30X30X2  array  of  cells  and  is  termed  a  board  segment. 

GRID  -  an  individual  entry  in  GRIDDATA. 

SEGWD,  SEGLN,  CURSEGVi/D,  CURSEGLN  -  these  are  integer  values  that  keep 
track  of  the  current  segment  loaded  into  memory  (CURSEG'.^  and 
CURSEGLN)  and  the  new  segment  (SEGWD  and  SEGLN)  containing  the  cell 
currently  under  consideration.  A  suffix  of  WD  designates  a  width 
coordinate.  A  suffix  of  LN  designates  a  length  coordinate. 

NEWWD,  NEWLN  -  these  integer  values  are  the  relative  coordinates  of 
the  current  cell  within  a  board  segment. 

NUi!  -  a  general  purpose  integer  variable  to  store  keyboard  numerical 
input  in  TNTRSTUB. 

MAXWID,  tlAXLEN  -  these  are  integer  values  representing  the  maximum 
board  dimensions. 

ANSWER  -  a  character  value  read  from  the  keyboard  in  response  to  a 
question. 

SEGCHRl,  SEGCHR2  -  the  string  equivalent  of  SEGIVD  and  SEGLN, 
respectively. 

CURSEGFILE  -  the  name  of  the  current  secondary  storage  file  loaded 
into  memory.  Other  literal  characters  are  concatenated  with  SEGCHRl 
and  SEGCHR2  to  uniquely  define  the  individual  board  segments. 

I,  J,  K  -•  integer  value  input  representing  the  width,  length,  and  side 
coordinates  of  cells  in  BORDSTUB  and  INITBORD  and  as  an  index  in 
INITBORD. 

NAME,  FILENAME  -  NAME  is  the  unique  name  a  user  can  provide  if 
building  multiple  INTRFILEs.  FILENAME  concatenates  additional 
information  to  NA^tE  and  uses  FILENAME  to  refer  to  the  file. 

REDO,  MORE  -  boolean  flags  to  Indicate  whether  a  value  requires 
changing  (REDO)  or  if  there  is  more  input  data  (MORE). 


PROGRAM  DATASTUB; 

Function  -  to  allow  the  ust.r  ‘o  build  datafiles,  specify  obstacle 
cells,  and  initialize  the  segments. 

Global  parameters  modified  -  MAXWID,  MAXLEN,  REDO,  MORE. 

Local  parameters  modified  -  none. 

Calling  procedures  -  none. 

Called  procedures  -  RESPONSE,  INTRSTUB,  INITBORD,  BORDSTUB. 
Superior  procedure  -  program  DATASTUB. 

Sub-procedures  -  TNTRSTUB,  CALCFILE,  INITBORD,  BORDSTUB. 


RD-fiiss  sea  n  cohprrison  rnd  rnrlvsis  of  vintr's  globrl  routing  2/2 

RLGORITHH  UlTH  THE  LE.  .  <U>  RIR  FORCE  INST  OF  TECH 
HRIGHT-PRTTERSON  RFB  OH  SCHOOL  OF  ENGI.  .  F  T  CHESLEV 
UNCLASSIFIED  HHR  85  RFIT/GCS/ENG/SSH-l  F/G  12/1  NL 


MICROCOPy  RESOLUTION  TEST  CHART 

NATIONAL  BUREAU  OF  STANDARDS-1963-A 


Special  processing  -  if  the  user  wishes  to  build  an  interconnection 
file,  he  will  input  the  width/length  coordinates  for  both  start  and 
end  cells.  The  program  will  prompt  for  each  specific  coordinate  and 
all  four  coordinates  have  to  be  entered.  The  nets  can  then  be 
accepted  or  rejected.  If  there  are  more  nets,  additional 
data  can  be  entered.  If  there  are  no  more  entries,  the  data  can  now 
be  saved.  Not  saving  the  data  will  destroy  the  entire  interconnec¬ 
tion  file.  The  program  will  then  ask  to  initialize  the  board.  To 
do  this,  the  program  will  create  and  initialize  the  segments 
and  mark  those  cell  found  in  the  interconnection  (net)  file  as 
unavailable  on  the  board.  The  last  input  routine  is  for  obstacle 
cell  coordinates.  An  entry  can  be  rejected  and  multiple  obstacle 
cells  can  be  entered. 

CONST 

MAXSEGV/D-2; 

MAXSEGLN-2; 

TYPE 

INTRDATA-PACKED  ARRAY [1.. 4]  OF  1..60; 

RECDATA-PACKED  RECORD 

OBS : BOOLEAN; 

RCH: BOOLEAN; 

DIR: PACKED  ARRAY [1.. 3)  OF  0..2 
END; 

GRIDDATA-PACKED  ARRAY( 1 . .30, 1 . .30, 1 . .2 ]  OF  RECDATA; 

VAR 

INTRFILE:FILE  OF  INTRDATA; 

INTR:INTRDATA; 

BORDFILE.-FILE  OF  GRIDDATA; 

GRID:GRIDDATA; 

I, J,K: INTEGER; 

SEGWD , SEGLN , NEiWD , NEWLN : INTEGER ; 

CURSEGWD,CURSEGLN: INTEGER; 

NUM,MAXWID ,MAXLEN: INTEGER; 

ANSt«:R:CIIAR; 

SEGCHRl , SEGCHR2 ,CURSEGFTLE , NAME , FILENAME : STRING ; 

REDO, MORE: BOOLEAN 

BEGIN 

:  lAXWID :  -:LAXSEGWD*30  ; 

MAXLEN: -NAXSEGLN*30 ; 

REDO: -TRUE; 

MORE: -TRUE; 

WRITE  ('DO  YOU  WISH  TO  BUILD  AN  INTERCONNECTION  '); 

WRITE  ('LIST?(Y/N)  '); 

RESPONSE; 

IF  (ANSWER-'Y')  OR  (ANSWER-'y')  THEN 
INTRSTUB; 

WRITE  ('DO  YOU  WISH  TO  INITIALIZE  THE  BOARD  AT  '); 

ITOITE  ('THIS  TI{tE?(Y/N)  '); 

RESPONSE; 
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IF  (AKSWER-'Y')  OR  (ANSWER»'y')  THEN 
BEGIN  (*THEN*) 

IJRITELN  ('INITALIZING  BOARD,  PLEASE  WAIT.') 
INITBORD 
END;  (*THEN*) 

WRITELN  ('DO  YOU  WISH  TO  SPECIFY  ADDITIONAL  '); 
WRITE  ('OBSTACLE  CELL  DATA?(Y/N)  '); 

RESPONSE* 

IF  (ANSWER-'Y')  OR  (ANSWER-'y')  THEN 
BORDSTUB; 

WRITELN  ('***END  OF  DATa  STUB***') 

END.  (*END  DATASTUB*) 


PROCEDURE  RESPONSE; 

Function  -  reads  the  keyboard  for  a  user  response  to  a  question. 
Global  paracieters  modified  -  ANSWER. 

Local  parameters  modified  -  none. 

Calling  procedures  ~  program  DATASTUB,  INTRSTUB,  BOROSTUB. 

Called  procedures  -  none. 

Superior  procedure  -  program  DATASTUB. 

Sub-procedures  -  none. 

Special  processing  -  checks  to  ensure  a  yes  or  no  response  Is  given 

BEGIN 

REPEAT 

READ  (KEYBOARD .ANSWER) 

UNTIL  ANSWER  IN  [ 'Y' , 'N' ,'y' ,'n' J ; 

WRITELN  (ANSWER) 

END:  (*PROCEDURE  RESPONSE*) 


PROCEDURE  NUMCHK; 

Function  -  validates  that  Input  data  Is  within  the  proper  numerical 
range  of  values. 

Global  parameters  modified  -  NU^l. 

Local  parameters  modified  -  none. 

Calling  procedures  -  INTRSTUB. 

Called  procedures  -  none. 

Superior  procedure  -  program  DATASTUB. 

Sub-procedures  -  none. 

Special  processing  -  ensure  coordinate  values  range  from  1  to  60. 

BEGIN 

REPEAT 

READ  (KEYBOARD, NUM) 

UNTIL  NUM  IN  [1..60]; 

WRITELN  (NUM) 

END:  (*PR0CEDURE  NUMCHK*) 


PROCEDURE  INTRSTUB; 

Function  input  Interconnoction  cell  coordinates. 

Global  procedures  modified  -  NAME,  FILENAME,  REDO,  INTR,  INTRFILE, 
MORE. 

Local  procedures  modified  -  none. 

Calling  procedures  -  program  DATASTUB. 

Called  procedures  -  NUMCHK,  RESPONSE. 

Superior  procedure  -  program  DATASTUB. 

Sub-procedures  -  none. 

Special  processing  -  coordinates  are  Input  one  at  a  time.  The  entry 
can  be  redone,  eliminated,  or  accepted.  If  there  is  no  more  Input 
data,  the  Interconnection  file  can  be  saved  or  destroyed. 

BEGIN 

TOITE  ('WHAT  IS  THE  NAME  OF  YOUR  lOTERCONNECTION  FILE?  '); 

READ  (KEYBOARD, NAME); 

WRITELN  (NAME); 

IF  NAME-"  THEN 
NAME; -'INTRFILE'; 

FILENAME : -CONCAT  ( ' PSEUDO ; ' , NAME , ' . DATA' ) ; 

REWRITE  (INTRFILE, FILENAME); 

WHILE  MORE  00 
BEGIN  (*WHILE1*) 

REDO: -TRUE; 

WHILE  REDO  DO 
BEGIN  (*WHILE2*) 

WRITE  ('INPUT  START  WIDTH.  '); 

NUMCHK; 

INTRtlJ:-NUM; 

WRITE  ('INPUT  START  LENGTH.  '); 

NUMCHK; 
rNTR[2] :-NUM; 

WRITE  ('INPUT  END  WIDTH.  '); 

NUMCHK; 

INTR(3] ;-NUM; 

WRITE  ('INPUT  END  LEIWTH.  '); 

NUMCHK; 

INTR(4J ;-NUM; 

WRITE  ('ROUTE  ',INTR{1] ,',',INTR[2] ,'  TO  '); 

WRITELN  aNTR[3],',',INTRl4]); 

WRITE  ('DO  YOU  WISH  TO  REDO  THIS  ElTrRY?(Y/N)  '); 

RESPONSE; 

IF  (ANSWER-'N')  OR  (ANSWER-'n')  THEN 
REDO; -FALSE 
END;  (*WHILE2*) 

INTRFILE'; -INTR; 

PUT  (INTRFILE); 

WRITE  ('MORE  C0NNECTI0NS?(Y/N)  '); 

RESPONSE; 


IF  (ANSWER-'N')  OR  (ANSWBR-'n')  THEN 
MORE: -FALSE 
END;  (*WHILE1*) 

WRITE  ('SAVE  DATA?(Y/N)  '); 

RESPONSE; 

IP  (ANSWER-'Y')  OR  (ANSWER-'y')  THEN 
CLOSE  (INTRFILE.LOCK) 

ELSE 

CLOSE  (INTRFILE) 

END;  (*PROCEDURE  INTRSTUB*) 
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PROCEDURE  CALCFILE  (II ,12 : INTEGER) ; 

Funccion  -  the  absolute  width  coordinate  (II)  and  absolute  length 
coordinate  (12)  are  passed  to  this  procedure  to  detect  when  a  cell 
Is  In  a  different  segment  and  to  calculate  the  cells's  relative 
coordinates. 

Global  parameters  modified  -  SEGIVD,  SEGLN. 

Local  parameters  modified  -  II,  12. 

Calling  procedures  -  INITBORD,  BORDSTUB. 

Called  procedures  -  CALCSEG,  EXCHFILE,  NEWCOOR. 

Superior  procedure  -  program  DATASTUB. 

Sub-procedures  -  CALCSEG,  EXCHFILE,  NEWCOOR. 

Special  processing  -  If  the  segment  has  changed,  segments  are 
exchanged.  Relative  coordinates  are  then  calculated  for  the  cell. 

BEGIN 

SEGWD:-CALCSEG(I1); 

SEGLN:-CALCSEG(I2); 

IF  (SEGMDOCURSEGWD)  OR  (SEGLNOCURSEGLN)  THEN 
BEGIN  (*THEN*) 

EXCHFILE;  ( *PROCEDURE* ) 

NEWCOOR  (*PROCEDURE*) 

END  (*THEN*) 

ELSE 

NEWCOOR  (*PROCEDURE*) 

END;  (*PROCEDURE  CALCFILE*) 


FUNCTION  CALCSEG  (VAL: INTEGER); INTEGER; 

Function  -  this  function  returns  an  Integer  value.  It  accepts  an 
absolute  integer  coordinate  (VAL)  and  computes  the  relative 
coordinate  within  a  grid  segment. 

Global  parameters  modified  -  none. 

Local  parameters  modified  -  VAL,  CALCSEG. 

Calling  procedures  -  CALCFILE. 

Called  procedures  *■  none. 

Superior  procedure  -  CALCFILE. 

Sub-procedures  -  none. 

Special  processing  -  this  function  Is  called  twice  in  CALCFILE,  once 
to  calculate  the  relative  width  and  once  to  calculate  the  relative 
length  coordinates. 

BEGIN 

CALCSEG :-!+(( VAL-1)  DIV  30) 

END:  (*PR0CEDURE  CALCSEG*) 


PROCEDURE  EXCHFILE; 

Function  -  writes  the  old  segment  to  secondary  storage  and  reads 
the  new  segment  Into  primary  memory. 

Global  parameters  modified  -  CURSEGWD,  CURSEGLN,  SEGCHRl,  SEGCHR2, 
CURSEGFILE,  BORDFILE. 

Local  parameters  modified  -  none. 

Calling  procedures  ■*  CALCFILE. 

Called  procedures  -  none. 

Superior  procedrue  -  CALCFILE. 

Sub-procedures  -  none. 

Special  processing  -  as  each  new  file  is  read  into  memory,  its  entry 
is  purged  from  secondary  storage.  Also,  the  width  and  length 
Integer  values  are  converted  to  string  values  and  concatenated  with 
other  string  values  to  form  the  current  file  name.  The  [16] 
appended  to  the  end  of  the  filename  ensures  sufficient  and  necessary 
storage  is  reserved  for  the  file. 

BEGIN 

REWRITE  (BORDFILE, CURSEGFILE); 

BORDFILE*: -GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK); 

STR  (SEGWD, SEGCHRl); 

STR  (SEGLN,SEGCHR2); 

CURSEGWD; -SEGWD; 

CURSEGLN: -SEGLN; 

CURSEGFILE :-CONCAT( 'PSEUDO :SEG* .SEGCHRl ,SEGCHR2, 

'.DATA[161"); 

RESET  (BORDFILE, CURSEGFILE); 

GRID: -BORDFILE*; 

CLOSE  (BORDFILE, PURGE) 

END;  (*PROCEDURE  EXCHFILE*) 


PROCEDURE  NEWCOOR; 

Function  -  uses  the  absolute  width  (SEGIVD)  and  length  (SEGLN)  integer 
values  passed  to  CALCFILE  to  calculate  the  relative  cell  position 
within  the  segment. 

Global  parameters  modified  -  NEiifWD,  NEWLN. 

Local  parameters  modified  -  none. 

Calling  procedures  -  CALCFILE. 

Called  procedures  -  none. 

Superior  procedure  -  CALCFILE. 

Sub-procedures  -  none. 

Special  processing  -  none. 

BEGIN 

NEWiD :  - 1 1  -  ( ( SEGWD- 1 )  *  3  0  ) ; 

I:EWLN  :  -1 2-  (  (  SEGLN- 1 )  *30  ) 

END;  (‘PROCEDURE  NEWCOOR*) 


PROCEDURE  INITBORD; 

Function  -  initialize  all  segment  parameters  for  the  entire  board. 
Global  parameters  modified  ~  SEGWD,  SEGLN,  CURSEGWD,  CURSEGLN, 
SEGCHRl,  SEGCUR2,  CURSEGFILE,  BORDFILE,  I,  J,  K,  OBS,  RCH,  DIR, 
INTR. 

Local  parameters  modified  -  none. 

Calling  procedures  -  INITBORD,  BORDSTUB. 

Called  procedures  ~  CALCFILE. 

Superior  procedure  -  program  DATASTUB. 

Sub-procedures  -  none. 

Special  processing  -  first,  mark  OBS  and  RCH  flags  as  false  and  all 
DIR  as  0,  then  use  the  Interconnection  entry  coordinates  to  flag 
cells  as  obstacles.  Saves  the  segments  to  RAM  disk. 

BEGIN 

FOR  SEGWD :»1  TO  MAXSEGiTO  DO 
FOR  SEGLN:»1  TO  MAXSEGLN  DO 
BEGIN  (*F0R*) 

CURSEGOT: -SEGWD; 

CURSEGLN:-SEGLN; 

STR  (SEGWD, SEGCHRl); 

STR  (SEGLN,SEGCHR2); 

CURSEGFILE : -C0NCAT( 'PSEUDO : SEG' , SEGCHRl , SEGCHR2 , 

'.DATA[16]'); 
vmiTELN  (CURSEGFILE); 

REWRITE  (BORDFILE, CURSEGFILE); 

FOR  I:-l  TO  30  DO 
FOR  J:-l  TO  30  DO 
FOR  K;-l  TO  2  DO 
WITH  GRrD{I,J,K]  DO 
BEGIN  (*WITH*) 

OBS: -FALSE; 

RCH; -FALSE; 

DIRfl] ;-0; 

DIR(2i :-0; 

DIR[3] :-0 
END;  (*WITH*) 

BORDFILE': -GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK) 

END;  (*F0R*) 

RESET  (INTRFILE,FILENAfIE); 

WHILE  (NOT  EOF(INTRFILE))  DO 
BEGIN  (*WHILE*) 

INTR:-INTRFILE"; 

I;-INTR[1]; 

J;-INTR[2] ; 

CALCFILE  (I,J); 

GRID  [  NEWVH) ,  NEWLN ,  1  j . OBS ;  -TRUE ; 

GRID  [  NEl^WD , NEWLN ,  2  ]  .OBS ; -TRUE ; 

I:-INTR[3] ; 
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PROCEDURE  BORDSTUB; 

Function  -  to  enter  obstacle  cells  on  the  board  and  mark  as 
unavailable. 

Global  parameters  modified  -  MORE,  I,  J,  K,  CBS. 

Local  parameters  modified  -  none. 

Calling  procedures  -  program  DATASTUB. 

Called  procedures  -  CALCFILE. 

Superior  procedure  -  program  DATASTUB. 

Sub-procedures  *■  none. 

Special  processing  -  ensure  each  coordinate  Is  valid  and  for  all 
entries  to  be  accepted,  rejected,  or  redone.  Allow  multiple  cell 
Inputs. 

BEGIN 

MORE: -TRUE; 

WHILE  MORE  DO 
BEGIN  (*WHILE*) 

WRITE  ('ENTER  WIDTH  COORDINATE.  '); 

REPEAT 

READ  (KEYBOARD,!) 

UNTIL  I  IN  [1..60]; 

WRITELN  (I); 

WRITE  ('ENTER  LENGTH  COORDINATE.  '); 

REPEAT 

READ  (KEYBOARD.J) 

UNTIL  J  IN  11..60]; 
raiTELN  (J); 

WRITE  ('ENTER  SIDE  COORDINATE.  '); 

REPEAT 

READ  (KEYBOARD, K) 

UNTIL  K  IN  [1..60]; 

WRITELN  (K); 

CALCFILE  (I,J); 

GRID [ NEWD , NE WLN , K ] . OBS : -TRUE ; 

WRITELN  ('DO  YOU  WISH  TO  REDO  THIS  '); 

WRITE  ('OBSTACLE  CELL?(Y/N)  '); 

RESPONSE; 

IF  (ANSWER-'N')  OR  (ANSWER-'n')  THEN 
REDO: -FALSE 
ELSE 

GRlD[NEWWD,NE\fl-N,K] .OBS:-FALSE; 

WRITE  ('MORE?(Y/N)  '); 

RESPONSE; 

IF  (ANSWER-'N')  OR  (ANSWER-'n')  THEN 
MORE: -FALSE 
END  (*WHILE*) 

END;  (*BORDSTUB*) 
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Program 

Program  ROUTE  is  a  Pascal  program  using  a  heuristic  algorithm  (LEE) 
to  route  wires  on  a  two- layer  printed  circuit  board  (GRIDDATA). 
Following  execution  of  the  initial  route  (LEE),  Vintr's  algorithm  is 
executed  (VINTR).  Although  the  program  can  only  store  30X30X2  cells 
(GRIDDATA)  in  memory  at  one  time,  extra  board  segments  are  kept 
on  secondary  storage  (BQRDFILE)  and  retrieved  as  necessary. 


Inputs  -  (1) 


Outputs  - 


(2) 

(1) 

(2) 


an  interconnection  file  (INTRFILE)  with  net 
width/length  coordinates. 

individual  board  segments  (GRIDDATA)  as  required, 
a  route  file  (ROUTFILE)  with  start  and  end  cells 
and  all  intermediate  cells  forming  the  connection  path, 
updated  individual  board  segments  (GRIDDATA). 


Constants 

MAXIMPOS  -  defines  the  maximum  allowable  unroutable  nets. 

MAXSEG^'TD,  MAXSEGLN  -  these  values  define  the  number  of  segments  along 
the  width  and  length  of  the  board,  respectively.  Together,  they 
define  the  overall  board  dimensions.  To  Increase  the  board 
dimensions,  merely  Increase  these  values. 


Array  Types 

INTRDATA  -  a  4X1  packed  array  storing  integer  values  of  0..60.  The 
values  represent  board  coordinate  values.  Element  1  is  the  start 
width,  element  2  is  the  start  length,  element  3  is  the  stop  width, 
and  element  4  is  the  stop  length. 

ROUTDATA  -  a  3X1  packed  array  storing  integer  values  of  1..60.  The 
values  represent  the  coordinate  values  of  cell  elements. 

Element  1  is  the  width,  element  2  is  length,  and  element  3  is  the 
side. 

GRIDDATA  -  a  30X30X2  packed  array  of  RECDATA.  Eacli  specific  element 
of  the  array  corresponds  to  a  specific  position  in  a  single  board 
segment. 

Record  Type 

RECDATA  -  each  cell  is  represented  by  a  single  record.  Each 

record  has  two  flags  and  a  3X1  packed  array  storing  integer  values 
of  0..2.  The  first  flag  is  OBS  and  designates  whether  or  not  the 
cell  Is  an  obstacle.  The  second  flag  is  RCH  and  designates  whether 
or  not  the  ceil  has  been  previously  reached  during  the  current  cell 
expansion  phase.  The  3X1  array  (DIR)  represents  the  integer  values 
required  for  retrace  once  the  end  cell  has  been  reached.  The  first 
element  of  DIR  is  the  width  retrace  direction,  the  second  element 
of  DIR  is  the  length  retrace  direction,  and  the  third  element  of  DIR 
Is  the  side  retrace  direction.  A  value  of  0  signifies  no  change,  1 
signifies  a  +l  change,  and  2  signifies  a  -1  change  in  the  present 
coordinate  position.  These  values  are  added  to  the  current 
coordinates  to  achieve  the  next  retrace  cell.  Note  that  only  one 
direction  parameter  should  ever  be  non-zero. 
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Variables 

INTRFILE  “  a  secondary  storage  file  of  INTRDATA.  Entries  are  the 
width/length  coordinates  of  the  net's  end  cells  to  be 
connected. 

IMPOS  -  the  width/length  coordinates  of  an  unrouted  net. 

INTR  -  the  width/length  coordinates  of  a  net's  end  cells. 

ROUTFILE  -  a  secondary  storage  file  of  ROUTDATA.  A  single  entry 
represents  the  coordinates  of  a  cell.  A  connection  is  stored 
as  a  series  of  entries  in  the  following  form:  start  cell,  end  cell, 
intermediate  cells,  start  cell.  This  format  aids  the  calculations 
necessary  in  procedures  CHKDIST  and  BLDTAIL. 

ST,  RT  -  these  integer  values  hold  the  cell  coordinates  of  a  path  and 
are  used  to  partially  control  the  printing  process 

ROUT  -  an  individual  entry  in  ROUTFILE. 

BORDFILE  -  a  secondary  storage  file  of  GRIDDATA.  Each  file  is  a 
30X30X2  array  of  cells  and  is  termed  a  board  segment. 

GRID  -  an  individual  entry  in  GRIDDATA. 

RLIST,  ELIST  -  360X3  packed  arrays  with  Integer  values  of  0..120. 

Each  is  a  sequential  listing  (up  to  360  entries)  of  cell  coordinates 
(width,  length,  side).  RLIST  stores  the  coordinates  of  cells  that 
are  reached  during  the  current  expansion  phase.  ELIST  is  the  list 
of  cells  available  for  expansion  in  the  next  cell  expansion  phase. 

WC,  LC,  SC  -  the  current  cell  of  width,  length,  and  side, 
respectively. 

WCAl,  WCSl,  LCAl,  LCSl  -  the  width  coordinate  changes  for  possible 
expansion  (WCAL  is  a  +1  change  and  WCSl  Is  a  '*!  change)  and  the 
length  coordinate  changes  for  possible  expansion  (LCAl  is  a  +l 
change  and  LCSl  is  a  -1  change. 

BW,  BL,  EW,  EL,  ES  -  coordinates  for  the  start  width,  start  length, 
end  width,  end  length,  and  end  side,  respectively. 

NW,  NL,  NS  “  coordinates  for  the  new  width,  length,  and  side  which 
are  calculated  from  the  current  cell  coordinates  and  the  addition  of 
the  current  cell's  DIR  elements. 

SEGWD,  SEGLN,  CURSEGUD,  CURSEGLN  -  these  are  integer  values  that  keep 
track  of  the  current  segment  loaded  into  memory  (CURSEGUD  and 
CURSEGLN)  and  the  segment  (SEGWD  and  SEGLN)  containing  the  cell 
currently  under  consideration.  A  suffix  of  WD  designates  a  width 
coordinate.  A  suffix  of  LN  designates  a  length  coordinate. 

NEUWD,  NEt^N  -  these  integer  values  are  the  relative  coordinates  of 
the  current  cell  within  a  board  segment. 

CONNECTED,  IMPOSSIBLE  -  these  are  boolean  flags.  CONNECTED  indicates 
a  connection  is  successful  for  the  net.  IMPOSSIBLE  indicates  a 
connection  is  not  successful  for  the  net. 

E,  R,  HUM  -  E  is  the  index  for  ELIST,  R  is  the  index  for  RLIST,  and 
NUM  is  the  total  number  of  entries  in  RLIST  for  the  current 
expansion. 

NUMIMPOS  -  an  integer  value  of  the  total  number  of  unrouted  nets. 

MAXUID,  MAXLEN  -  these  are  integer  values  representing  the  maximum 
board  dimensions. 
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ANSWER  -  a  character  value  read  from  the  keyboard  In  response  to  a 
question. 

SEGCHRl,  SEGCHR2  -  the  string  equivalent  of  SEGITO  and  SEGLN, 
respectively. 

CURSEGFILE  -  the  name  of  the  current  secondary  storage  file  loaded 
Into  memory.  Other  literal  characters  are  concatenated  with  SEGCHRl 
and  SEGCHR2  to  uniquely  define  the  Individual  board  segments. 

IMPOSLIST  -  a  list  of  cell  coordinates  for  unrouted  nets. 

ITERATION  -  an  integer  value  for  the  number  of  the  current  Vintr 
interatlon. 

LENGTH  -  an  Integer  value  summing  the  Manhattan  distance  of  a  path. 

X,  Y,  Z,  CHARI,  CHAR2,  CHAR3  -  individual  coordinate  values  of  a  path 
(width,  length,  side)  are  stored  in  X,  Y,  2  respectively.  Then  they 
are  converted  to  string  values  and  stored  in  CHARI,  CHAR2,  and  CHAR3 
respectively.  Used  In  the  printing  process. 

OUTPUT  -  string  variable  storing  the  output  media  ("PRINTER"). 

BCG  **  a  character  value  variable  denoting  various  conditions  during 
the  printing  process.  A  "C”  indicates  a  change  to  a  new  path,  "Y" 
Indicates  the  start  of  a  new  path,  and  "N“  Indicates  the  end  of  the 
path. 

INDEX  -  a  general  Index. 

I  -  >  counter  to  sum  the  number  of  path  cells  printed  across  the 
paper. 

FID  -  the  variable  name  given  to  interactive  use  of  the  printer  for 
the  printing  process. 
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PROGRAM  ROUTE; 

Function  ■*  executes  the  LEE  algorithm  first  and  then  VINTR. 

Global  parameters  modified  -  MAXWID,  MAXLEN,  ITERATION,  ROUTFILE, 
NUMIMPOS,  IMPOS,  IMPOSLIST,  INDEX. 

Local  parameters  modified  -  none. 

Calling  procedures  -  none. 

Called  procedures  -  YESNO,  LEE,  PRINTIT,  VINTR. 

Superior  procedure  -  none. 

Sub-procedures  -  YESNO,  PRINTIT,  CALCFILE,  I NIT,  RETRACE,  SORTLIST, 
SORTSEG,  RCHECK,  EXPAND,  EXPCKl,  EXPCK2,  LEE,  VINTR. 

Special  processing  -  open  the  data  input  file  (INTRFILE)  and  the  data 
output  file  (ROUTFILE).  Initialize  the  impossible  connection  list, 
then  run  LEE,  print  the  results  and  run  VINTR. 

CONST 

MAXIMP0S-40; 

MAXSECUD-2; 

MAXSEGLN-2; 

TYPE 

INTRDATA-PACKED  ARRAY [1.. 4)  OF  0..60; 

ROUTDATA-PACKED  ARRAY [I..!]  OF  1..60; 

RECDATA-PACKED  RECORD 
OBS: BOOLEAN; 

RCH! BOOLEAN; 

DIR:PACKED  ARRAY(I..3]  OF  0..2 
END; 

griddata-packed  array[1..30,i..30,i..21  of  RECDATA; 

VAR 

INTRFILE: FILE  OF  INTRDATA; 

IMPOS , INTR: INTRDATA; 

IMPOSLIST; PACKED  ARRAY [ 1 . .MAXIMPOS]  OF  INTRDATA; 

ROUTFILE : FILE  OF  ROUTDATA; 

ST , RT , ROUT : ROUTDATA ; 

BORDFILE;FILE  OF  GRIDDATA; 

GRID:GRIDDATA; 

RLIST,ELIST:PACKED  ARRAY(l..360,1..3]  OF  0..60; 

INDEX, WC,LC, SC, WCS1,WCA1,LCS1,LCA1; INTEGER; 

I , SEGWD , SEGLN , NEIAM) , NEWLN , ITERATION, LENGTH ; INTEGER; 

NUMIMPOS , CURSEGUD , CURSEGLN ,X , Y , Z : I NTEGER ; 

E , R , NUM , B W , BL , EW , EL , ES ,  , NL , NS , MAXWID , MAXLE  N ; I NTEGER ; 

ANSWER, BEG: CHAR; 

SEGCURl ,SEGCllR2 ,CURSEGFILE, CHARI ,CHAR2 ,CHAR3 : STRING; 

OUTPUT: STR I NG(8]; 

CONNECTED , IMPOSSIBLE : BOOLEAN; 

FID; INTERACTIVE; 

BEGIN 

ITERAT10N;-0; 

IIAXWID ;  -MAXSEGWD*30 ; 

MAXLEN; -MAXSEGLN*30 ; 

WRITE  ('DO  YOU  WISH  TO  RUN  THE  LEE  ROUTER? (Y/N)  '); 


105 


*  .w'  . 


IP  (ANSWER-'Y')  THEN 
BEGIN  (*THEK*) 

REWRITE  ( ROUTFILE , 'PSEUDO : ROUTFILE . DATA [ 30  J ' ) ; 
RESET  ( INTRFILE , ' PSEUDO : INTRFILE .DATA' ) ; 
NUM1MPOS;-0; 

FOR  INDEX.— 1  TO  4  DO 
IMPOSE  INDEX] :-0; 

FOR  INDEX :-l  TO  MAXIMPOS  DO 
IMPOSLISTE INDEX] ;«IMPOS; 

LEE;  (*PROCEDURE*) 

WRITELN  ('TOTAL  UNROUTABLE  CONNECTIONS-' .NUMItIPOS) 
CLOSE  (ROUTFILE, LOCK); 

CLOSE  (INTRFILE); 

PRINTIT;  (*PROCEDURE*) 

VINTR  (*PROCEDURE*) 

END;  (*THEN*) 

WRITE  ('END  ROUTE') 

D.  (*PROGRAM  ROUTE*) 


PROCEDURE  YESNO; 

Function  ~  reads  the  keyboard  response  to  a  question. 

Global  parameters  modified  -  ANSIVER. 

Local  parameters  modified  ~  none. 

Calling  procedures  -  program  ROUTE. 

Called  procedures  -*  none. 

Superior  procedure  '  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  checks  to  ensure  a  yes  or  no  answer  Is  given. 

BEGIN 

REPEAT 

READ  (KEYBOiVRD, ANSWER) 

UNTIL  ANSWER  IN  [ 'Y' , 'N' , 'y' ,'n' ] ; 

WRITELN  (ANSWER) 

END;  (*PROCEDURE  YESNO*) 
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PROCEDURE  PRINTIT; 

Function  -  output  ROUTFILE  data  and  then  the  iapossible  connections 
to  a  printer. 

Global  parameters  modified  ~  BEG,  I,  OUTPUT,  CHARI,  CHARI,  INDEX, 
IMPOS. 

Local  parameters  modified  “  none. 

Calling  procedures  -  program  ROUTE,  VINTR. 

Called  procedures  -  DISPLAY. 

Superior  procedure  -  program  ROUTE. 

Sub“procedures  -  DISPLAY . 

Special  processing  -  controls  the  number  of  retrace  cells  printed 
across  the  page  and  prints  the  unconnected  nets. 

BEGIN 

BEG:-'c'; 

I;-0; 

OUTPUT : -'PRINTER : ' ; 

RESET  (FID, OUTPUT); 

WRITELN  (FID,'***ROUTFILE  PRINT***'); 

RESET  ( ROUTFILE , 'PSEUDO : ROUTFILE .DATA' ) ; 

STR  (ITERATI0N,CHAR1); 

IF  ITERATI0N>0  THEN 

WRITELN  (FID, 'ITERATION-', CHARI); 

WHILE  NOT  EOF  (ROUTFILE)  DO 
BEGIN  (*WHILE*) 

IF  1-8  THEN 
BEGIN  (*THEN*) 

WRITELN  (FID); 

DISPLAY;  (*PROCEDURE*) 

GET  (ROUTFILE); 

I;-l 

END  (*THEN*) 

ELSE 

BEGIN  (*ELSE*) 

DISPLAY;  (*PROCEDURE*) 

GET  (ROUTFILE); 

I;-I+l 

END  (*ELSE*) 

END;  (*WHILE*) 

CLOSE  (ROUTFILE); 

WRITELN  (FID, 'END  OF  ROUTFILE.'); 

WRITELN  (FID); 

WRITELN  (FID); 


PROCEDURE  DISPLAY; 

Function  -  control  the  printing  process  of  when  paths  change. 

Global  parameters  modified  -  RT,  LENGTH,  ST,  BEG,  X,  Y,  Z,  CHARI, 
CHAR2,  C11AR3. 

Local  parameters  modified  ~  none. 

Calling  procedures  ~  PRINTIT. 

Called  procedures  -  none. 

Superior  procedure  -  PRINTIT. 

Sub-procedures  -  none. 

Special  processing  -  the  coordinates  of  the  path  are  read  and  con¬ 
verted  to  string  values  for  printing.  The  length  is  simultaneously 
cummed  as  cells  are  processed  after  subtracting  2  from  the  initial 
start  length  retrace  path  due  to  some  redundant  data  for  each  cell 
in  ROUTFILE.  The  length  is  also  printed  when  coordinates  for  a  new 
path  are  encountered. 

BEGIN 

RT; -ROUTFILE'; 

IF  BEG-'C'  THEN 
BEGIN  (*THEN*) 

LENGTH:— 2; 

ST:-RT; 

BEG:-'Y' 

END;  (*THEN*) 

X;-RT[1] ; 

Y;-RTl2j; 

Z:=RT[3] ; 

STR  (X,CHAR1); 

STR  (Y,CHAR2); 

STR  (Z,CHAR3); 

LENGTH :«LENGTH+1; 

WRITE  (FID, CHARI, ',',CHAR2,',',CHAR3,'  '); 

IF  (ST-RT)  THEN 
BEGIN  (*THEN1*) 

IF  BEG»'N'  THEN 
BEGIN  (*THEN2*) 

WRITELN  (FID); 

WRITELN  (FID, 'LENGTH-  ', LENGTH); 

WRITELN  (FID); 

WRITELN  (FID); 

BEG;-'C' 

END;  (*THEN2*) 

IF  BEG-'Y'  THEN 
BEG:-'N' 

END  (*THEN1*) 

END;  (*PROCEDURE  DISPLAY*) 


PROCEDURE  CALCFILE  (II ,12: INTEGER) ; 

Function  -  the  absolute  width  coordinate  (II)  and  absolute  length 
coordinate  (12)  are  passed  to  this  procedure  to  detect  when  a  cell 
Is  In  a  different  segment  and  to  calculate  relative  cell 
coordinates. 

Global  parameters  modified  ^  SEGWD,  SEGLN. 

Local  parameters  modified  -  II,  12. 

Calling  procedures  -  RETRACE,  EXPCKl,  EXPCK2,  LEE,  CHKDIST,  BLDTAIL, 
ROUTVNTR. 

Called  procedures  -  CALCSEG,  EXCHFILE,  NEWCOOR. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  CALCSEG,  EXCHFILE,  NEWCOOR. 

Special  processing  -  if  the  segment  has  changed,  segments  are 

exchanged.  Relative  cell  coordinates  are  then  calculated  for  the 
point. 

BEGIN 

SEGlrfD :  -CALCSEG  (II); 

SEGLN :-CALCSEG( 12) ; 

IF  (SEGWDOCURSEGWD)  OR  (SEGLNOCURSEGLN)  THEN 
BEGIN  (*THEN*) 

EXCHFILE;  (*PROCEDURE*) 

NEWCOOR  (*PROCEDURE*) 

END  (*THEN*) 

ELSE 

NEWCOOR  (*PROCEDURE*) 

END;  (*PROCEDURE  CALCFILE*) 


FUNCTION  CALCSEG  (VAL: INTEGER) ; INTEGER; 

Function  -  this  function  returns  an  integer  value.  It  accepts  an 
absolute  integer  coordinate  (VAL)  and  computes  the  relative  cell 
coordinates  within  a  segment. 

Global  parameters  modified  -  none. 

Local  parameters  modified  -  VAL,  CALCSEG. 

Calling  procedures  -  CALCFILE. 

Called  procedures  -  none. 

Superior  procedure  -  CALCFILE. 

Sub-procedures  -  none. 

Special  processing  -  this  function  is  called  twice  in  CALCFILE,  once 
to  calculate  the  relative  width  and  once  to  calculate  the  relative 
length  cell  coordinates. 

BEGIN 

CALCSEG ;-!+(( VAL-1)  DIV  30) 

END;  (*PR0CEDURE  CALCSEG*) 


PROCEDURE  EXCHFILE; 

Function  -  writes  the  old  segment  to  secondary  storage  and  reads 
the  new  segment  Into  primary  memory. 

Global  parameters  modified  -  CURSEGWD,  CURSEGLM,  SEGCHRl ,  SEGCUR2 , 
CURSEGFILE,  BORDFILE,  GRID. 

Local  parameters  modified  -  none. 

Calling  procedures  -  CALCFILE. 

Called  procedures  -  none. 

Superior  procedrue  -  CALCFILE. 

Sub-procedures  -  none. 

Special  processing  -  as  each  new  file  is  read  into  memory,  its  entry 
is  purged  from  secondary  storage.  Also,  the  width  and  length 
integer  values  are  converted  to  string  values  and  concatenated  with 
other  string  values  to  form  the  current  file  name.  The  [161 
appended  to  the  end  of  the  filename  ensures  sufficient  and  necessary 
storage  is  reserved  for  the  file. 

BEGIN 

REWRITE  (BORDFILE, CURSEGFILE); 

BORDFILE”: -GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE. LOCK); 

CURSEGWD  :-SEGm; 

CURSEGLN;-SEGLN; 

STR  (SEGWD, SEGCHRl); 

STR  (SEGLN,SEGCHR2); 

CURSEGFILE : -CONCAT( 'PSEUDO : SEG' .SEGCHRl , SEGCHR2 , 

'.DATA[16J'); 

RESET  (BORDFILE, CURSEGFILE); 

GRID: -BORDFILE”; 

CLOSE  (BORDFILE, PURGE) 

END;  (*PROCEDURE  BORDFILE*) 


PROCEDURE  NEWCOOR; 

Function  -  uses  the  absolute  width  (SEGWD)  and  length  (SEGLN)  integer 
values  passed  to  CALCFILE  to  calculate  the  relative  cell  position 
within  the  segment. 

Global  parameters  modified  -  NEWWD,  NEWLN. 

Local  parameters  modified  ~  none. 

Calling  procedures  -  CALCFILE, 

Called  procedures  “  none. 

Superior  procedure  -  CALCFILE, 

Sub-procedures  -  none. 

Special  processing  -  none. 

BEGIN 

NEIWD:-I1-((SEGWD-1)*30); 

NEWLN: -I2-<(SEGLN-1) *30) 

END;  (*PR0CEDURE  NEWCOOR*) 


PROCEDURE  INIT; 

Function  -  with  the  start  of  each  new  net,  all  DIR  and  RCH 
entries  for  the  cells  of  all  segments  are  initialized.  In 
addition,  all  RLIST  and  ELIST  entries  are  initialized. 

Global  parameters  modified  -  CURSEGWD,  CURSEGLN,  SEGCHRl,  SEGCURZ, 
CURSEGFILE,  DIR,  RCH,  RLIST,  ELIST,  R,  SC,  IMPOSSIBLE,  CONNECTED, 
NUM,  BORFILE,  GRID. 

Local  parameters  modified  -  none. 

Calling  procedures  -  LEE. 

Called  procedures  -  none. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  none. 


BEGIN 

WRITELN  ('INITIALIZING  BOARD  SEGMENT.'); 

FOR  SEGOT:-!  TO  MAXSEGTO  DO 
FOR  SEGLN:-1  TO  MAXSEGLN  DO 
BEGIN  (*FOR*) 

CURSEGWD :*SEGWD; 

CURSEGLN  .—SEGLN; 

STR  (SEGWD, SEGCHRl); 

STR  ( SEGLN, SEGCHR2); 

CURSEGFILE : “CONCAT ( 'PSEUDO : SEG ' , SEGCHR 1 , SEGCHR2 , 

'.DATAI16J'); 

RESET  (BORDFILE, CURSEGFILE); 

GRID:-BORDFILE“; 

CLOSE  ( BORDFILE , PURGE ) ; 

FOR  WC:-1  TO  30  DO 
FOR  LC:-1  TO  30  DO 
FOR  SC:-1  TO  2  DO 

WITH  GRID[WD,LC,SC1  DO 
BEGIN  (*WITH*) 

DIR{l]:-0; 

DIR(2] ;-0; 

DIR[31:=-0; 

RCH: -FALSE 
END;  (*WITH*) 

REWRITE  (BORDFILE, CURSEGFILE); 

BORDFILE': -GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK); 

WRITELN  (CURSEGFILE,'  INITIALIZED.') 

END;  (*F0R*) 

RESET  (BORDFILE, CURSEGFILE); 

GRID -.-BORDFILE'; 

CLOSE  (BORDFILE, LOCK); 


115 


/  / 


PROCEDURE  RETRACE; 

Function  -  the  retrace  path  is  found. 

Global  parameters  modified  -  NW,  NL,  NS,  OBS,  BORDFILE. 

Local  parameters  modified  -  ADDW,  ADDL,  ADDS. 

Calling  procedures  *■  RCHECK. 

Called  procedures  -  SAVEROUT,  CALCFILE. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  SAVEROUT. 

Special  processing  -  processing  begins  at  the  end  cell.  While  the 
current  coordinates  do  not  equal  the  start  cell  coordinates,  each 
DIR  value  is  retrieved  from  the  current  GRID  entry,  stored  in  an 
intermediate  variable  (ADDW,  ADDL,  and  ADDS).  DIR  values  of  ”2"  are 
stored  as  -1.  ADDW,  ADDL,  and  ADDS  are  then  added  to  the  current 
coordinate  position  (NW,  NL,  or  NS)  except  when  the  DIR  value  equals 
2.  In  this  case,  -I  is  added  instead  of  2.  Each  successive  set  of 
cell  coordinates  are  passed  to  SAVEROUT. 

VAR 

ADDW, ADDL, ADDS: INTEGER; 

BEGIN 

WRITELN  ('  BEGIN  RETRACE  '); 

SAVEROUT  (BW,BL,1); 

NW:-EW; 

NL;-EL; 

NS:-ES; 

SAVEROUT  (NW,NL,NS); 

WRITE  (NW,',',NL,',',NS); 

CALCFILE  (NW,NL); 

WITH  GRID[NEIWD,NEWLN,NS]  DO 

l^RITELN  ('  ',DIR[1],'  ',DIR(2],'  ',DIRI3]); 

WHILE  ((BWONW)  OR  (BLONL)  OR  (NS>1))  DO 
BEGIN  (*WHILE*) 

WITH  GRID[NEWWD,NEWLN,NS1  DO 
BEGIN  (*WITH*) 

IF  DIR(l]-2  THEN 
ADDW:— 1 
ELSE 

ADDW:-DIR[1] ; 

IF  DIR[2]-2  THEN 
ADDL:— 1 
ELSE 

ADDL:*DIR12]; 

IF  DIR[31-2  THEN 
ADDS:  — 1 
ELSE 

ADDS:-DIR[3J; 


NS:»NS+ADDS; 

NL:-NL+ADDL; 

IJW:»Ntf+ADDW 
END;  (*WITH*) 

CALCFILE  (NIJ.NL); 

GRID [ NEWWD , NE WLN , NS ] . OBS : -TRUE ; 
SAVEROUT  (NW.NL.NS); 

WRITE  (NW.'.'.NL.'.'.NS); 

WITH  GRlDiwEWWD.NEWLN.NS]  DO 

WRITELN  ('  '.DIRIIJ,'  ',DIRI2], 
END;  (*WH1LE*) 

REWRITE  (BORDFILE.CURSEGFILE); 
BORDFILE*:-GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK) 

END;  (*PROCEDURE  RETRACE*) 


PROCEDURE  SAVEROUK II ,12,13 ; INTEGER) ; 

Function  -  the  three  coordinate  values  (II,  12,  13)  are  passed  to  this 
procedure  and  saved  on  secondary  storage. 

Global  parameters  modified  -  ROUT,  ROUTFILE. 

Local  parameters  modified  -  II,  12,  13. 

Calling  procedures  -  RETRACE. 

Called  procedures  -  none. 

Superior  procedure  ~  RETRACE. 

Sub-procedures  -  none. 

Special  processing  -  none. 

BEGIN 

ROUTtl] :-Il; 

R0UT[21 :-l2; 

ROUT|3j:-l3; 

ROUTFILE*: -ROUT; 

PUT  (ROUTFILE) 

END;  (*PROCEDURE  SAVEROUT*) 


PROCEDURE  SORTLIST; 

Function  -  entries  are  sorted  according  to  the  least  Manhattan 
distance  from  RLIST's  width  and  length  entries  to  the  end  cell's 
coordinates.  The  Manhattan  distance  of  each  two  successive  entries 
(SI  and  S2)  are  compared.  If  the  higher  Indexed  entry's  distance  Is 
less  than  the  other,  then  the  two  entries  exchange  positions  In 
RLIST.  When  all  RLIST  entries  have  been  compared,  the  process 
begins  again  until  no  exchanges  are  made. 

Global  parameters  modified  -  RLIST. 

Local  parameters  modified  -  TEMP,  SWITCH,  SI,  S2. 

Calling  procedures  -  RCHECK. 

Called  procedures  -  none. 

Superior  procedure  **  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  a  bubble-sort  technique  Is  used  to  sort  RLIST  in 
ascending  distance  using  TEMP  as  a  temporary  array.  SWITCH  Is  used 
to  designate  when  entries  are  changed.  When  SWITCH  Is  true  the  sort 
starts  from  the  beginning  and  processes  RLIST  until  no  exchanges  are 
made  (SWITCH-FALSE). 

VAR 

TEMPrPACKED  ARRAY[1..31  OF  1..60; 

SWITCH: BOOLEAN; 

S1,S2: INTEGER; 

BEGIN 

SWITCH: -TRUE; 

(;HILE  SWITCH  DO 
BEGIN  (*WHILE*) 

SWITCH: -FALSE; 

FOR  E:-R  DOWNTO  2  DO 
BEGIN  (*FOR*) 

Sl:-ABS(RLIST[E,l|-EW)+ABS(RLIST[E,2J-EL); 

S2:-ABS(RLISTlE-l,l]-EW)+ABS(RLlST[E-l,2]-EL); 

IF  S1<S2  THEN 
BEGIN  (*THEN*) 

SWITCH; -TRUE; 

TEMP[1] ;-RLIST(E-l,l] 

TEMP(2] ;-RLIST(E-l,2J 
TEMP(3] :-RLIST(E-l,3] 

RLIST(E-l,l]  .—RLISTIE,!]; 

RLIST[E-1 ,2 J :-RLIST[E,2] ; 

RLIST(E-1,3] :-RLIST(E,3J; 

RLISTIE,1J :-TEMP[l]; 

RLIST[E,2] ;-TEMPl2J; 

RHST(E,3]  ;-TEMP[3] 

END  (*THEN*) 

END  (*FOR*) 

END  (*IfflILE*) 

END;  (*PROCEDURE  SORTLIST*) 


PROCEDURE  SORTSEG; 

Function  -  to  sort  the  RLIST  entries  Into  groups  based  upon  the 
segment  each  belongs  to  in  an  effort  to  reduce  the  number  of  I/O 
operations. 

Global  parameters  modified  -  ELIST,  RLIST. 

Local  parameters  modified  -  Tl,  T2,  T3,  TNUM,  CURSl,  CURS2,  SI,  S2. 

Calling  procedures  -  RCHECK. 

Called  procedures  ~  none. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  the  first  entry  of  RLIST  is  selected  and  the 
segment  It  belongs  to  Is  calculated.  That  entry  and  all  others 
belonging  to  the  same  segment  are  written  to  ELIST  and  removed 
from  RLIST.  Then  the  first  entry  is  again  retrieved  from  RLIST  and 
the  same  process  Is  continued  until  no  RLIST  entries  remain.  T3  is 
the  Index  for  RLIST  with  TNUM  entries  in  RLIST.  T2  is  the  total 
number  of  remaining  entries  In  RLIST.  Tl  is  the  total  number  of 
entries  written  to  ELIST.  The  segment  coordinates  of  the  first 
entry  in  RLIST  (the  closest  cell  to  the  end  cell)  are  calculated  and 
stored  in  CURSl  and  CURS2  and  the  RLIST  entry  is  stored  in  ELIST. 
Subsequent  segment  coordinates  are  stored  in  SI  and  S2.  If  the  grid 
coordinates  are  the  same,  the  new  cell  is  stored  in  ELIST;  other¬ 
wise,  it  is  stored  in  the  first  available  entry  In  RLIST.  When  all 
cells  of  a  specific  segment  are  in  ELIST,  the  first  entry  of 
RLIST  is  selected  and  the  segment  coordinates  calculated. 

VAR 

TNUM,T1 ,T2 ,T3 , CURSl ,CURS2 ,Sl ,S2 : INTEGER; 

BEGIN 

Tl:-0; 

TNUH:-R; 

WHILE  TNUMOO  DO 
BEGIN  (*WHILE*) 

T2;-0; 

FOR  T3;»l  TO  TNUM  DO 
BEGIN  (*FOR*) 

S1;-1+((RLIST(T3,1]-1)  DIV  30); 

S2;«1+((RLIST[T3,2J-1)  DIV  30); 

IF  T3-1  THEN 
BEGIN  (*THEN*) 

CURSl; -SI; 

CURS2:-S2 
END;  (*THEN*) 


IT 


f 


■:  IF  (Sl-CURSl)  AND  (S2-CURS2)  THEN 

BEGIN  (*THEN*) 

^  Tl:-Tl+1; 

1  ELIST[T1,1]:*RLIST[T3,1]; 

ELIST[T1,2] :-RLISTIT3,2); 
ELISTIT1,3] :-RLISTlT3,3) 

END  (*THEN*) 

ELSE 

^  BEGIN  (*ELSE*) 

I  T2:-T2+l; 

RLIST(T2.1j:-RLISTtT3,l]; 
RLIST [T2 , 2 1 : -RLIST [13,21; 
RLIST[T2,31:-RLIST[T3,3] 

END  (*ELSE*) 

END;  (*FOR*) 

TNUM:-T2 
END  (*WHILE*) 

END;  (^PROCEDURE  SORTSEG*) 


if 


i  (• 

« 


» 


i 


122 


PROCEDURE  RCHECK; 

Function  -  saves  unroutable  nets,  retraces  path  for  routed  nets, 
and  prepares  ELIST  for  the  next  series  of  expansions  If  no 
connection  been  made. 

Global  parameters  modified  -  R,  INTR,  NUMIMPOS,  IMPOSSIBLE,  NUM, 
BORDFILE. 

Local  parameters  modified  -  none. 

Calling  procedure  -  LEE. 

Called  procedures  -  RETRACE,  SORTLIST,  SORTSEG. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  stores  unroutable  nets  In  an  array 

(IMPOSLIST).  If  a  connection  has  been  made  then  RETRACE  Is  called 
otherwise,  the  RLIST  entries  are  sorted  and  ELIST  Is  built. 

BEGIN 

IF  R-0  THEN 
BEGIN  (*THEN*) 

WRITELN  ('  '); 

WRITELN  ('BW,',',BL,'->',EW,',',EL,'  IMPOSSIBLE!'); 

INTR[1]:-BW; 

INTR[21:-BL; 

INTR[31;-EW; 

INTR[4]:-EL; 

NUMIMPOS :-NUMIMPOS+l ; 

IMPOSLIST(tRJMIMPOS] INTR; 

REWRITE  ( BORDFILE, CURSEGFILE); 

BORDFILE”; -GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK); 

IMPOSSIBLE; -TRUE 
EOT  (*THEN*) 

ELSE 

IF  CONNECTED  THEN 
RETRACE 
ELSE 

BEGIN  (*ELSE*) 

IF  R>1  THEN 
SORTLIST; 

SORTSEG; 

NUM;-R; 

R;-0 

END  (*ELSE*) 

END;  (*PROCEDURE  RCHECK*) 
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PROCEDURE  EXPAND  (W,L,S: INTEGER); 

Function  -  to  check  the  status  of  a  cell  to  determine  if  it  can  be 
reached. 

Global  parameters  modified  -  R,  RCH,  ES,  CONNECTED,  RLIST. 

Local  parameters  modified  ~  W,  L,  S. 

Calling  procedures  -  EXPCKl,  EXPCK2. 

Called  procedures  -  none. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  the  cell  coordinates  (W,  L,  S)  are  passed  and 
they  are  checked  to  determine  if  a  connection  has  been  made.  If  so, 
the  condition  (CONNECTED)  is  set;  otherwise,  if  the  cell  is  not  an 
obstacle,  it  is  added  to  RLIST. 

BEGIN 

IF  (W-EW)  AND  (L-EL)  THEN 
BEGIN  (*THEN1*) 

R:>1; 

GRID  I  NEtrrfD ,  NEWLN ,  S  ] .  RCH :  “TRUE ; 

IF  S“2  THEN 

BEGIN  (*THEN2*) 

GRID [ NEWWD , NEWLN , 1 ]. DIR [ 3 ]: “1 ; 

S;-l 

END;  (*THEN2*) 

ES;-S; 

WRITELN  ('CONNECTION  IS  ILVDE.'); 

CONNECTED: “TRUE 
END  (*THEN1*) 

ELSE 

IF  NOT  GRID [NEW^J, NEWLN, SJ.OBS  THEN 
BEGIN  (*THEN*) 

GRID[NEWWD,NEWLN,S] .RCH:“TRUE; 

R:“R+1; 

RLIST [R,1J:“W; 

RLIST[R,21 :“L; 

RLISt[r,3];“S 
END  (*THEN*) 

END;  (*PROCEDURE  EXPAND*) 
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PROCEDURE  EXPCKl; 

Function  -  to  check  all  adjacent  cells  for  possible  expansion 
and  to  record  the  retrace  direction  if  a  point  is  reached. 

Global  parameters  modified  -  DIR. 

Local  parameters  modified  -  none. 

Calling  procedures  -  LEE. 

Called  procedures  -  CALCFILE,  EXPAND. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  if  the  cell  has  not  been  connected,  for  each 
expansion  direction  attempted,  a  check  is  made  to  see  if  the  cell 
has  been  previously  reached.  If  the  cell  has  been  reached,  it  Is 
skipped  and  the  next  direction  is  attempted.  For  a  cell  not 
reached,  EXPAND  is  called  and  if  the  cell  is  then  reached,  the 
specific  retrace  direction  is  stored  in  the  appropriate  DIR  location 
and  the  next  direction  is  attempted.  This  process  continues  until 
all  four  adjacent  cells  have  been  checked. 


BEGIN 

IF  (WCS1>-1)  AND  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN1*) 

CALCFILE  (WCS1,LC); 

IF  NOT  GRID[NEWH),NEWLN,SC].RCH  THEN 
BEGIN  (*THEN2*) 

EXPAND  (WCSl,LC,SC); 

IF  GRID[NEWWD,NEV7LN,SC].RCH  THEN 
GRID [ NEWWD , NEWLN , SC  J . DIR [ 1 ] : »1 ; 
END  (*THEN2*) 

END;  (*THEN1*) 

IF  (WCAK-MAXWID)  AND  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN1*) 

CALCFILE  (WCA1,LC); 

IF  NOT  GRID (I^EWWD, NEWLN, SC ]  .RCH  THEN 
BEGIN  (*TIIEN2*) 

EXPAND  (WCA1,LC,SC); 

IF  GRID[trt:W\ro,NE;^LN,SCl.RCH  THEN 
GRID [NEWWD, NEWLN, SC] .DIR(l] :-2; 
END  (*THEN2*) 

END;  (*THEN1*) 

IF  (LCS1>=1)  AND  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN1*) 

CALCFILE  (WC,LCS1); 

IF  NOT  GRID [ NEWWD, NE'.«.N, SC  1  .RCH  THEN 
BEGIN  (*THEN2*) 

EXPAND  (WC,LCS1,SC); 

IF  GRID [ NEWWD, NE;n.N, SC J.RCH  THEN 
GRID [ NEWWD , NEWLN , SC j . DIR [ 2 J ; «1 ; 
END  (*THEN2*) 

END;  (*THEN1*) 
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IF  (LCA1<»MAXLEN)  AOT  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN1*) 

CALCFILE  (UC.LCAl); 

IF  NOT  GRIDtNEWWD.NEWLN.SCJ.RCH  THEN 
BEGIN  (*THEN2*) 

EXPAND  (MC.LCAl.SC); 

IF  GRIDINEWND.NEWLN.SC] .RCH  THEN 
GRID[NEWWD,NEWLN,SC] .DIR(2J :-2; 
END  (*THEN2*) 

END;  (*THEN1*) 

END;  (*PROCEDURE  EXPCKl*) 


PROCEDURE  EXPCK2 

Function  -  to  check  the  adjacent  cell  on  the  opposite  layer  for 

possible  expansion  and  record  the  retrace  direction  if  the  cell  is 
reached. 

Global  parameters  modified  -  DIR. 

Local  parameters  modified  -  none. 

Calling  procedures  -  LEE. 

Called  procedures  -  CALCFILE,  EXPALD. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  if  the  cell  has  not  been  connected,  the  opposite 
direction  expansion  is  attempted,  a  check  is  made  to  see  if  the 
cell  has  been  previously  reached.  If  the  cell  has  been  reached, 
it  is  skipped.  For  a  cell  not  reached,  EXPAND  is  called  and  if 
the  cell  is  then  reached,  Che  specific  retrace  direction  is  stored 
in  the  appropriate  DIR  location. 

BEGIN 

IF  (SC=1)  AND  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN1*) 

CALCFILE  (WC,LC); 

IF  NOT  GRID[NEWIH),NEIJLN,2]  .RCH  THEN 
BEGIN  (*THEN2*) 

EXPAND  (WC,LC,2); 

IF  GRID[NEWUD,NEWLN,2] .RCH  THEN 
GRID[NEWWD,NEWLN,2] .DIR(3] :-2; 

END  (*THEN2*) 

END;  (*THEN1’») 

IF  (SC-2)  AND  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN1*) 

CALCFILE  (WC,LC); 

IF  NOT  GRID (HEWWD,NEWLN,1] .RCH  THEN 
BEGIN  (*THEN2*) 

EXPA:JD  (WC,LC,l); 

IF  GRID (NEWWD,NEl^N,ll .RCH  THEN 
GRID ( NEWWD , NEWLN , 1 J . DIRI 3 ] : -1 ; 

END  (*THEN2*) 

END;  (*THEN1*) 

END;  (*PROCEDURE  EXPCK2*) 


PROCEDURE  LEE; 

Function  -  to  drive  the  basic  LEE  algorithm.  It  calculates  the 
adjacent  width  and  length  coordinate  values  to  be  used  during  the 
actual  expansion  of  a  point.  LEE  continues  to  execute  until  no 
ELIST  entries  are  left  to  expand. 

Global  parameters  modified  -  BW,  BL,  EW,  EL,  ELIST,  RLIST,  WC,  LC,  SC 
WCAl,  WCSl,  LCAl,  LCSl,  DIR. 

Local  parameters  modified  -  none. 

Calling  procedures  -  ROUTVNTR. 

Called  procedures  -  INIT,  CALCFILE,  EXPCKl ,  EXPCK2,  RCHECK. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  none. 

Special  processing  -  while  there  are  still  nets  to  route,  LEE  will 
retrieve  each  from  INTRFILE  and  store  the  layer  1  beginning 
coordinates  in  ELIST  and  the  layer  2  beginning  coordinates  in  RLIST 
Each  entry  in  ELIST  is  expanded  until  the  connection  is  made  or  it 
is  determined  that  the  connection  is  impossible. 


BEGIN 

WHILE  NOT  EOF  (INTRFILE)  DO 
BEGIN  (*WHILE1*) 

WRITELN  ('***NEW  CONNECTION***'); 

INIT; 

INTR; -INTRFILE"; 

BW:-INTR[1]; 

BL:-INTR{2]; 

EW:-INTR[3i; 

EL:-rNTR[4i; 

ELIST[1,11:-BW; 

ELIST[1,2] ;-BL; 

ELIST[l,3];-l; 

RLIST[R,1] :-BW; 

RLIST[R,2] :-BL; 

RLIST[R,3] :-2; 

Ci\LCFILE  (BW,BL); 

GRID [ NEWWD , NEWLN , 2 ] . DIR [ 3 1 : -2 ; 

WHILE  (NOT  CONNECTED)  AND  (NOT  IMPOSSIBLE)  DO 
BEGIN  (*WHILE2*) 

FOR  E;-l  TO  NUM  DO 

IF  (NOT  CONNECTED)  THEN 
BEGIN  (*THEN*) 

WC:-ELIST[E,1I; 

LC:-ELIST[E,2J; 

SC:-ELIST[E,3); 

WCS1;-WC-1; 

WCA1:-WC+1; 

LCS1;-LC-1; 

LCA1;-LC+1: 
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IF  (E-1)  THEN 

WRITELN  (BW,',',BL,'->',EM,',',EL,' 
WC,'/,LC,','.SC); 

EXPCKl; 

EXPCK2 

END;  (*THEN*) 

RCHECK 

END;  (*WHILE2*) 

GET  (INTRFILE) 

END  (*WHILE1*) 

END;  (*PROCEDURE  LEE*) 
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PROCEDURE  VINTR; 

Function  -  control  the  iteration  and  preparation  of  input  data  for 
processing  by  Vlntr's  algorithm  and  the  printing  of  results. 

Global  parameters  modified  -  ITERATION,  INDEX,  LEN,  ROUTFILE. 

Local  parameters  modified  -  TAILLIST. 

Calling  procedures  -  program  ROUTE. 

Called  procedures  -  ROUTLEN,  BLDTAIL,  ROUTVNTR,  PRINTIT. 

Superior  procedure  -  program  ROUTE. 

Sub-procedures  -  ROUTLEN,  BLDTAIL,  ROUTVNTR. 

Special  processing  -  for  each  iteration  the  LEN  array  is  initialized 
then  processing  control  is  sequentially  passed  to  procedures  for 
calculating  the  path  lengths,  building  tails  from  the  paths,  routing 
the  cell  pairs,  and  printing  results. 

VAR 

TAILLIST: FILE  OF  ROUTDATA; 

NEW , START , STOP : ROUTDATA; 

REMOVE , COU NT , LENTAIL : INTEGER ; 

LEN: ARRAY  [1..80]  OF  INTEGER; 

BEGIN 

FOR  ITERATION:-!  TO  4  DO 
BEGIN  (*FOR*) 

tmiTELN  ('ITERATION-if', ITERATION); 

FOR  INDEX :-l  TO  80  DO 
LEN[ INDEX] :-0; 

RESET  (ROUTFILE, 'PSEUDO: ROUTFILE. DATA'); 

ROUTLEN; 

CLOSE  (ROUTFILE, LOCK); 

RESET  (ROUTFILE , 'PSEUDO : ROUTFILE . DATA' ) ; 

REWRITE  ( TAILLIST , 'PSEUDO ; TAILLIST . DATA [ 30 ] ' ) ; 

BLDTAIL; 

CLOSE  (ROUTFILE, PURGE); 

CLOSE  (TAILLIST, LOCK); 

REWRITE  (ROUTFILE , ' PSEUDO: ROUTFILE .DATA [ 30 ] ' ) ; 

ROUTVNTR; 

CLOSE  (ROUTFILE, LOCK); 

WRITELN  ('TOTAL  UNROUTABLE  CONNECTIONS  FOR); 

WRITELN  ('ITERATION  ', ITERATION,'  IS  ' ,NUHI11P0S) ; 

WRITELN; 

PRINTIT 
END  (*F0R*) 

END;  (*PROCEDURE  VNTR*) 


PROCEDURE  ROUTLEN; 

Function  *■  calculates  the  path  lengths. 

ROUTE  Global  parameters  modified  -  INDEX. 

VINTR  Global  parameters  modified  -  START,  NEW,  LEN. 

Local  parameters  modified  *■  none. 

Calling  procedures  -  VINTR. 

Called  procedures  **  none. 

Superior  procedure  -  VINTR. 

Sub-procedures  -  none. 

Special  processing  -  lengths  are  calculated  and  stored  in  an  array 
(LEN)  corresponding  to  each  entry  in  ROUTFILE. 

BEGIN 

INDEX :-0; 

raiLE  NOT  EOF  (ROUTFILE)  DO 
BEGIN  (*raiLEl*) 

INDEX: -INDEX+1; 

START: -ROUTFILE”; 

GET  (ROUTFILE); 

GET  (ROUTFILE); 

NEW: -ROUTFILE”; 

LEN[INDEX] :-LEN[INDEX]+l; 

WHILE  (NEWOSTART)  00 
BEGIN  (*WHILE2*) 

LEN[INDEX1 :-LEN(INDEXI+l; 

GET  (ROUTFILE); 

NEW: -ROUTFILE” 

END;  (*WHILE2*) 

GET  (ROUTFILE) 

END  (*WHILE1*) 

END;  (*PROCEDURE  ROUTLEN*) 


PROCEDURE  BLDTAIL; 

Function  ~  the  length  of  a  path  is  used  to  calculate  Che  length  of 
tail  on  each  end  of  Che  path.  The  intermediate  cells  are  marked  as 
available.  All  cells  along  Che  tails  are  scored  in  TAILLIST. 

ROUTE  Global  parameters  modified  -  BW,  BL,  INDEX,  ROUT,  NU,  ML,  NS, 
OBS,  BORDFILE. 

VINTR  Global  parameters  modified  -  TAILLIST,  COUNT,  REMOVE,  LENTAIL, 
TAIL. 

Local  parameters  modified  -  none. 

Calling  procedures  -  VINTR. 

Called  procedures  -  CALCFILE. 

Superior  procedure  -  VINTR. 

Sub-procedures  -  none. 

Special- processing  -  ROUTFILE  entries  are  read  sequentially  and  cells 
Chat  are  part  of  a  tall  are  saved  in  TAILLIST.  The  length  of  a  tall 
is  calculated  from  Che  path  length  (LEN),  Che  ITERATION,  and  a 
constant  of  0.1.  Entries  up  to  the  length  of  Che  tall  are  saved, 
the  intermediate  cells  have  OBS  in  GRID  set  to  available,  and 
finally  the  second  tail  is  saved.  This  process  repeats  for  each 
path  in  ROUTFILE. 

BEGIN 

INDEX :-l; 

fcRIILE  NOT  EOF  (ROUTFILE)  DO 
BEGIN  (*WHILE*) 

TAILLIST^r-ROUTFILE*; 

PUT  (TAILLIST); 

LENTAIL :-TRUNC(LEN{ INDEX] *ITERATI0N*0. 1 ) ; 

FOR  COUNT :-l  TO  (LENTAIL+1)  DO 
BEGIN  (*F0R*) 

GET  (ROUTFILE); 

TAILLIST*: -ROUTFILE*; 

PUT  (TAILLIST) 

END;  (*F0R*) 

REMOVE : -LEN [ I NDEX ] -2  *LENTAIL-1 ; 

FOR  COUNT; -I  TO  REMOVE  DO 
BEGIN  (*F0R*) 

GET  (ROUTFILE); 

ROUT: -ROUTFILE*; 

NW;-R0UT(1]; 

NL;-R0UT[2]; 

NS;-R0UT(3]; 

CALCFILE  (NW,NL); 

GRID [ NEWWD , NEWLN , NS | . OBS : -FALSE 
END;  (*F0R*) 


FOR  COUNT ;-l  TO  (LENTAIL+1)  DO 
BEGIN  (*FOR*) 

GET  (ROUTFILE); 

TAILLIST* ; -ROUTFILE" ; 

PUT  (TAILLIST) 

END;  (*FOR*) 

GET  (ROUTFILE); 

INDEX: -INDEX+1 
END;  (*UHILE*) 

REWRITE  ( BORDFILE , CURSEGFILE ) ; 
BORDFILE";-GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK); 

WRITELN  ('TAILLIST  IS  BUILT.') 

END;  (^PROCEDURE  BLDTAIL*) 
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PROCEDURE  ROUTVNTR; 

Function  -  process  die  unrouCable  nets,  read  TAILLIST  entries 

and  eliminate  all  obstacle  cells  in  the  path  except  for  start/end 
cells,  and  passes  the  results  to  LEE  for  routing. 

ROUTE  Global  parameters  modified  -  INTRFILE,  INTR,  ROUT,  tAj,  NL,  MS, 
OBS,  BORDFILE. 

VIMTR  Global  parameters  modified  -  START,  STOP. 

Local  parameters  modified  -  VNTRFILE,  VNTR. 

Calling  procedures  -  VINTR. 

Called  procedures  -  CALCFILE,  LEE. 

Superior  procedure  -  VIOTR. 

Sub~procedures  ~  DONOROUTS. 

Special  processing  -  DONOROUTS  is  called  first  if  any  unroutable  nets 
exist.  The  first  entry  in  TAILLIST  is  read,  its  tails 
eliminated  except  for  the  start/end  cells  and  this  net  is 
loaded  into  VNTRFILE  and  processed  by  LEE.  This  process  continues 
for  each  path  In  TAILLIST  until  an  end  of  file  (EOF)  is  encountered 
with  TAILLIST. 

VAR 

VNTRFILE : FILE  OF  INTRDATA; 

VNTR; INTRDATA; 

BEGIN 

IF  NUMIMP0S>0  THEN 
DONOROUTS; 

RESET  (TAILLIST , 'PSEUDO : TAILLIST. DATA' ) ; 

WHILE  NOT  EOF  (TAILLIST)  DO 
BEGIN  (*WHILEl*) 

REWRITE  (INTRFILE , 'PSEUDO ; VNTRFILE . DATA [ 30 J ' ) ; 

START: -TAILLIST*; 

GET  (TAILLIST); 

STOP: -TAILLIST*; 

WRITELN  ('BUILDING  INTRFILE  ENTRY.'); 

INTR[1];-START[1]; 

INTR(2I:-START(2]; 

INTR(31;-ST0P[1]; 

INTR(4];-ST0P(2I; 

WRITE  ('ROUTE  ' , INTR[ 1 J , INTR[2 ) , '  TO  '); 

WRITELN  (INTR(3J,',',INTRI4]); 

INTRFILE* :-IOTR; 

PUT  (INTRFILE); 

GET  (TAILLIST); 

ROUT -.-TAILLIST*; 

WHILE  ((ROUTOSTART)  AND  (ROUTOSTOP) 

AND  (NOT  EOF(TAILLIST)))  DO 

BEGIN  (*WHILE2*) 

NW;-ROUTtlI; 

NL;-R0UT[2]; 

NS;-R0UT[3]; 

CALCFILE  (NW,IiL); 


GRID[NEIWD,NEWLN,NS] .0B3: -FALSE; 
GET  (TAILLIST); 

ROUT.’-TAILLIST* 

END;  (*WHILE2*) 

REWRITE  (BORDFILE.CURSEGFILE); 
BORDFILE“;-GRID; 

PUT  (BORDFILE); 

CLOSE  (BORDFILE, LOCK); 

WRITELN  ('INTRFILE  ENTRY  COMPLETE.'); 
CLOSE  (INTRFILE.LOCK); 

RESET  ( INTRFILE , 'PSEUDO : VNTRFILE . DATA' ) 
LEE; 

CLOSE  (INTRFILE.LOCK); 

GET  (TAILLIST) 

END;  (*WHILE1*) 

CLOSE  (TAILLIST, PURGE) 

END;  (*PROCEDURE  ROUTVNTR*) 


PROCEDURE  DONOROUTS; 

Functloa  -*  route  the  unrouted  nets. 

ROUTE  Global  parameters  modified  -  INTRFILE,  TJUMIMPOS. 

VINTR  Global  parameters  modified  -  none. 

Local  parameters  modified  -  none. 

Calling  procedures  -  ROUTVNTR. 

Called  procedures  *■  LEE. 

Superior  procedure  -  ROUTVNTR. 

Sub**procedures  -  none. 

Special  processing  -  the  entries  from  IMPOSLIST  are  loaded  into 
VNTRFILE  and  Chen  LEE  is  called  to  route  Che  net. 

BEGIN 

REWRITE  (INTRFILE , ' PSEUDO : VNTRFILE . DATA [ 30 ] ' > ; 

FOR  INDEX :-l  TO  ICMIMPOS  DO 
BEGIN  (*F0R*) 

INTRFILE* : -IMPOSLIST [ INDEX) ; 

PUT  (INTRFILE) 

END;  (*F0R*) 

CLOSE  (INTRFILE, LOCK); 

NUMIMP0S;-0; 

RESET  ( INTRFILE , ' PSEUDO : VNTRFILE . DATA' ) ; 

LEE; 

CLOSE  (INTRFILE, PURGE) 

END;  (*PROCEDURE  DONOROUTS*) 
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